home *** CD-ROM | disk | FTP | other *** search
Unknown | 1993-01-24 | 15.6 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| file
| data
| default
| |
100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 14 f4 3e 3c 65 | 64 69 74 66 69 6c 65 3e |.....><e|ditfile>|
|00000010| 20 52 53 41 0d 00 14 20 | f4 20 74 68 69 73 20 70 | RSA... |. this p|
|00000020| 72 6f 67 72 61 6d 6d 65 | 20 69 73 20 62 61 73 65 |rogramme| is base|
|00000030| 64 20 6f 6e 0d 00 1e 22 | f4 20 27 52 53 41 27 2c |d on..."|. 'RSA',|
|00000040| 20 41 63 6f 72 6e 20 75 | 73 65 72 20 4e 6f 76 2e | Acorn u|ser Nov.|
|00000050| 20 31 39 39 32 2e 0d 00 | 28 28 f4 20 28 43 29 20 | 1992...|((. (C) |
|00000060| 43 6f 70 79 72 69 67 68 | 74 20 4e 69 63 6b 20 43 |Copyrigh|t Nick C|
|00000070| 72 61 69 67 2d 57 6f 6f | 64 20 31 39 39 32 0d 00 |raig-Woo|d 1992..|
|00000080| 32 04 0d 00 3c 1a f1 22 | 54 68 69 73 20 69 73 20 |2...<.."|This is |
|00000090| 61 20 4c 69 62 61 72 79 | 2e 2e 2e 22 0d 00 46 07 |a Libary|..."..F.|
|000000a0| f1 22 22 0d 00 50 3a f1 | 22 20 28 63 29 20 31 39 |.""..P:.|" (c) 19|
|000000b0| 39 32 20 44 57 20 76 61 | 6e 20 47 75 6c 69 6b 20 |92 DW va|n Gulik |
|000000c0| 77 68 69 63 68 20 75 74 | 69 6c 69 73 65 73 20 74 |which ut|ilises t|
|000000d0| 68 65 20 27 4e 75 6d 62 | 65 72 73 27 22 0d 00 5a |he 'Numb|ers'"..Z|
|000000e0| 3b f1 22 20 20 20 20 20 | 20 20 20 20 20 6d 6f 64 |;." | mod|
|000000f0| 75 6c 65 20 6f 66 20 4e | 69 63 6b 2d 43 72 61 69 |ule of N|ick-Crai|
|00000100| 67 2d 57 6f 6f 64 2c 20 | 28 63 29 20 31 39 39 32 |g-Wood, |(c) 1992|
|00000110| 20 62 79 20 74 68 65 22 | 0d 00 64 2d f1 22 20 20 | by the"|..d-." |
|00000120| 20 20 20 20 20 20 20 20 | 41 63 6f 72 6e 2d 55 73 | |Acorn-Us|
|00000130| 65 72 20 6f 66 20 4e 6f | 76 65 6d 62 65 72 20 31 |er of No|vember 1|
|00000140| 39 39 32 2e 22 0d 00 6e | 05 e0 0d 00 78 04 0d 00 |992."..n|....x...|
|00000150| 82 10 dd 20 f2 5f 69 6e | 69 74 5f 52 53 41 0d 00 |... ._in|it_RSA..|
|00000160| 8c 28 2a 52 4d 45 6e 73 | 75 72 65 20 4e 75 6d 62 |.(*RMEns|ure Numb|
|00000170| 65 72 73 20 30 2e 30 20 | 52 4d 4c 6f 61 64 20 4e |ers 0.0 |RMLoad N|
|00000180| 75 6d 62 65 72 73 0d 00 | 96 3a 2a 52 4d 45 6e 73 |umbers..|.:*RMEns|
|00000190| 75 72 65 20 4e 75 6d 62 | 65 72 73 20 30 2e 30 20 |ure Numb|ers 0.0 |
|000001a0| 45 72 72 6f 72 20 31 20 | 4e 75 6d 62 65 72 73 20 |Error 1 |Numbers |
|000001b0| 6d 6f 64 75 6c 65 20 6e | 6f 74 20 66 6f 75 6e 64 |module n|ot found|
|000001c0| 0d 00 a0 12 48 65 61 70 | 53 69 7a 65 3d 31 30 30 |....Heap|Size=100|
|000001d0| 30 30 0d 00 aa 16 de 20 | 4e 75 6d 62 65 72 73 20 |00..... |Numbers |
|000001e0| 48 65 61 70 53 69 7a 65 | 0d 00 b4 11 de 20 74 6f |HeapSize|..... to|
|000001f0| 6b 65 6e 24 28 39 39 39 | 29 0d 00 be 2c c8 99 20 |ken$(999|)...,.. |
|00000200| 22 4e 75 6d 5f 48 65 61 | 70 49 6e 69 74 22 2c 4e |"Num_Hea|pInit",N|
|00000210| 75 6d 62 65 72 73 2c 48 | 65 61 70 53 69 7a 65 20 |umbers,H|eapSize |
|00000220| b8 20 68 70 25 0d 00 c8 | 40 c8 99 22 4f 53 5f 53 |. hp%...|@.."OS_S|
|00000230| 57 49 4e 75 6d 62 65 72 | 46 72 6f 6d 53 74 72 69 |WINumber|FromStri|
|00000240| 6e 67 22 2c 2c 22 4e 75 | 6d 5f 53 63 61 6c 61 72 |ng",,"Nu|m_Scalar|
|00000250| 4d 75 6c 22 20 b8 20 4e | 75 6d 5f 53 63 61 6c 61 |Mul" . N|um_Scala|
|00000260| 72 4d 75 6c 25 0d 00 d2 | 40 c8 99 22 4f 53 5f 53 |rMul%...|@.."OS_S|
|00000270| 57 49 4e 75 6d 62 65 72 | 46 72 6f 6d 53 74 72 69 |WINumber|FromStri|
|00000280| 6e 67 22 2c 2c 22 4e 75 | 6d 5f 53 63 61 6c 61 72 |ng",,"Nu|m_Scalar|
|00000290| 41 64 64 22 20 b8 20 4e | 75 6d 5f 53 63 61 6c 61 |Add" . N|um_Scala|
|000002a0| 72 41 64 64 25 0d 00 dc | 3a c8 99 22 4f 53 5f 53 |rAdd%...|:.."OS_S|
|000002b0| 57 49 4e 75 6d 62 65 72 | 46 72 6f 6d 53 74 72 69 |WINumber|FromStri|
|000002c0| 6e 67 22 2c 2c 22 4e 75 | 6d 5f 4d 6f 64 22 20 20 |ng",,"Nu|m_Mod" |
|000002d0| 20 20 20 20 20 b8 20 4e | 75 6d 5f 4d 6f 64 25 0d | . N|um_Mod%.|
|000002e0| 00 e6 3a c8 99 22 4f 53 | 5f 53 57 49 4e 75 6d 62 |..:.."OS|_SWINumb|
|000002f0| 65 72 46 72 6f 6d 53 74 | 72 69 6e 67 22 2c 2c 22 |erFromSt|ring",,"|
|00000300| 4e 75 6d 5f 41 64 64 22 | 20 20 20 20 20 20 20 b8 |Num_Add"| .|
|00000310| 20 4e 75 6d 5f 41 64 64 | 25 0d 00 f0 4e c8 99 22 | Num_Add|%...N.."|
|00000320| 4f 53 5f 53 57 49 4e 75 | 6d 62 65 72 46 72 6f 6d |OS_SWINu|mberFrom|
|00000330| 53 74 72 69 6e 67 22 2c | 2c 22 48 6f 75 72 67 6c |String",|,"Hourgl|
|00000340| 61 73 73 5f 50 65 72 63 | 65 6e 74 61 67 65 22 20 |ass_Perc|entage" |
|00000350| b8 20 48 6f 75 72 67 6c | 61 73 73 5f 50 65 72 63 |. Hourgl|ass_Perc|
|00000360| 65 6e 74 61 67 65 25 0d | 00 fa 1d c8 99 20 22 4e |entage%.|..... "N|
|00000370| 75 6d 5f 49 6e 69 74 22 | 2c 68 70 25 20 b8 20 74 |um_Init"|,hp% . t|
|00000380| 65 6d 70 25 0d 01 04 24 | c8 99 20 22 4e 75 6d 5f |emp%...$|.. "Num_|
|00000390| 49 6e 69 74 22 2c 68 70 | 25 20 b8 20 70 75 62 6c |Init",hp|% . publ|
|000003a0| 69 63 5f 6b 65 79 31 25 | 0d 01 0e 23 c8 99 20 22 |ic_key1%|...#.. "|
|000003b0| 4e 75 6d 5f 49 6e 69 74 | 22 2c 68 70 25 20 b8 20 |Num_Init|",hp% . |
|000003c0| 73 65 63 72 65 74 5f 6b | 65 79 25 0d 01 18 24 c8 |secret_k|ey%...$.|
|000003d0| 99 20 22 4e 75 6d 5f 49 | 6e 69 74 22 2c 68 70 25 |. "Num_I|nit",hp%|
|000003e0| 20 b8 20 70 75 62 6c 69 | 63 5f 6b 65 79 32 25 0d | . publi|c_key2%.|
|000003f0| 01 22 20 c8 99 20 22 4e | 75 6d 5f 49 6e 69 74 22 |." .. "N|um_Init"|
|00000400| 2c 68 70 25 20 b8 20 6d | 65 73 73 61 67 65 25 0d |,hp% . m|essage%.|
|00000410| 01 2c 22 c8 99 20 22 4e | 75 6d 5f 49 6e 69 74 22 |.,".. "N|um_Init"|
|00000420| 2c 68 70 25 20 b8 20 73 | 69 67 6e 61 74 75 72 65 |,hp% . s|ignature|
|00000430| 25 0d 01 36 16 73 69 67 | 6e 61 74 75 72 65 5f 6b |%..6.sig|nature_k|
|00000440| 6e 6f 77 6e 25 3d a3 0d | 01 40 14 f2 5f 66 69 6c |nown%=..|.@.._fil|
|00000450| 6c 5f 6f 75 74 5f 70 61 | 73 73 77 0d 01 4a 19 f2 |l_out_pa|ssw..J..|
|00000460| 5f 4d 73 68 61 64 65 28 | 64 65 73 6b 5f 4d 25 2c |_Mshade(|desk_M%,|
|00000470| 32 2c 31 29 0d 01 54 19 | f2 5f 4d 73 68 61 64 65 |2,1)..T.|._Mshade|
|00000480| 28 64 65 73 6b 5f 4d 25 | 2c 31 2c 31 29 0d 01 5e |(desk_M%|,1,1)..^|
|00000490| 11 ea 20 6d 63 25 2c 49 | 25 2c 6c 63 63 25 0d 01 |.. mc%,I|%,lcc%..|
|000004a0| 68 0d de 20 6d 63 25 20 | 35 30 30 0d 01 72 0e e3 |h.. mc% |500..r..|
|000004b0| 20 49 25 3d 30 20 b8 20 | 33 0d 01 7c 11 50 25 3d | I%=0 . |3..|.P%=|
|000004c0| 6d 63 25 3a 5b 4f 50 54 | 49 25 0d 01 86 22 2e 6c |mc%:[OPT|I%...".l|
|000004d0| 6f 77 65 72 5f 63 61 73 | 65 25 20 41 44 52 20 20 |ower_cas|e% ADR |
|000004e0| 20 20 72 31 2c 73 74 72 | 69 6e 67 25 0d 01 90 22 | r1,str|ing%..."|
|000004f0| 20 20 20 2e 6c 63 63 25 | 20 20 20 20 20 4c 44 52 | .lcc%| LDR|
|00000500| 42 20 20 20 72 30 2c 5b | 72 31 5d 2c 23 31 0d 01 |B r0,[|r1],#1..|
|00000510| 9a 1e 20 20 20 20 20 20 | 20 20 20 20 20 20 20 54 |.. | T|
|00000520| 45 51 20 20 20 20 72 30 | 2c 23 31 33 0d 01 a4 1b |EQ r0|,#13....|
|00000530| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 ec 51 20 | | .Q |
|00000540| 20 70 63 2c 72 31 34 0d | 01 ae 20 20 20 20 20 20 | pc,r14.|.. |
|00000550| 20 20 20 20 20 20 20 20 | 43 4d 50 20 20 20 20 52 | |CMP R|
|00000560| 30 2c 23 97 22 5a 22 0d | 01 b8 1c 20 20 20 20 20 |0,#."Z".|... |
|00000570| 20 20 20 20 20 20 20 20 | 42 47 54 20 20 20 20 6c | |BGT l|
|00000580| 63 63 25 0d 01 c2 20 20 | 20 20 20 20 20 20 20 20 |cc%... | |
|00000590| 20 20 20 20 43 4d 50 20 | 20 20 20 52 30 2c 23 97 | CMP | R0,#.|
|000005a0| 22 41 22 0d 01 cc 1c 20 | 20 20 20 20 20 20 20 20 |"A".... | |
|000005b0| 20 20 20 20 42 4c 54 20 | 20 20 20 6c 63 63 25 0d | BLT | lcc%.|
|000005c0| 01 d6 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|000005d0| 84 52 20 20 20 20 52 30 | 2c 52 30 2c 23 33 32 0d |.R R0|,R0,#32.|
|000005e0| 01 e0 23 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..# | |
|000005f0| 53 54 52 42 20 20 20 52 | 30 2c 5b 52 31 2c 23 2d |STRB R|0,[R1,#-|
|00000600| 31 5d 0d 01 ea 1c 20 20 | 20 20 20 20 20 20 20 20 |1].... | |
|00000610| 20 20 20 42 20 20 20 20 | 20 20 6c 63 63 25 0d 01 | B | lcc%..|
|00000620| f4 0c 2e 73 74 72 69 6e | 67 25 0d 01 fe 07 5d 3a |...strin|g%....]:|
|00000630| ed 0d 02 08 05 e1 0d 02 | 12 04 0d 02 1c 33 dd 20 |........|.....3. |
|00000640| a4 5f 6c 6f 77 65 72 5f | 63 61 73 65 28 24 73 74 |._lower_|case($st|
|00000650| 72 69 6e 67 25 29 3a d6 | 6c 6f 77 65 72 5f 63 61 |ring%):.|lower_ca|
|00000660| 73 65 25 3a 3d 24 73 74 | 72 69 6e 67 25 0d 02 26 |se%:=$st|ring%..&|
|00000670| 04 0d 02 30 13 dd 20 a4 | 70 72 69 6e 74 28 74 65 |...0.. .|print(te|
|00000680| 6d 70 25 29 0d 02 3a 1e | 20 c8 99 20 22 4e 75 6d |mp%)..:.| .. "Num|
|00000690| 5f 50 72 69 6e 74 22 2c | 74 65 6d 70 25 3a 20 3d |_Print",|temp%: =|
|000006a0| 22 22 0d 02 44 04 0d 02 | 4e 14 dd 20 a4 73 74 72 |""..D...|N.. .str|
|000006b0| 69 6e 67 28 74 65 6d 70 | 25 29 0d 02 58 0c 20 ea |ing(temp|%)..X. .|
|000006c0| 20 41 25 2c 61 24 0d 02 | 62 23 20 c8 99 22 4e 75 | A%,a$..|b# .."Nu|
|000006d0| 6d 5f 54 6f 53 74 72 69 | 6e 67 22 2c 74 65 6d 70 |m_ToStri|ng",temp|
|000006e0| 25 20 b8 20 41 25 2c 42 | 25 0d 02 6c 39 20 e7 20 |% . A%,B|%..l9 . |
|000006f0| 42 25 2d 41 25 3e 32 35 | 35 20 8c 20 85 20 31 2c |B%-A%>25|5 . . 1,|
|00000700| 22 4f 69 21 20 74 68 69 | 73 20 69 73 20 6a 75 73 |"Oi! thi|s is jus|
|00000710| 74 20 62 61 73 69 63 20 | 79 6f 75 20 6b 6e 6f 77 |t basic |you know|
|00000720| 21 22 0d 02 76 0b 20 3f | 42 25 3d 31 33 0d 02 80 |!"..v. ?|B%=13...|
|00000730| 0b 20 41 24 3d 24 41 25 | 0d 02 8a 1d 20 c8 99 22 |. A$=$A%|.... .."|
|00000740| 4f 53 5f 48 65 61 70 22 | 2c 33 2c 4e 75 6d 62 65 |OS_Heap"|,3,Numbe|
|00000750| 72 73 2c 41 25 0d 02 94 | 09 20 3a 3d 41 24 0d 02 |rs,A%...|. :=A$..|
|00000760| 9e 04 0d 02 a8 2d dd 20 | a4 5f 63 6f 75 6e 74 5f |.....-. |._count_|
|00000770| 6d 65 73 73 61 67 65 28 | 66 72 6f 6d 25 2c 74 6f |message(|from%,to|
|00000780| 25 2c 70 75 62 6c 69 63 | 5f 6b 65 79 31 25 29 0d |%,public|_key1%).|
|00000790| 02 b2 30 ea 20 4a 25 2c | 73 25 2c 4c 25 2c 44 25 |..0. J%,|s%,L%,D%|
|000007a0| 2c 45 25 2c 4c 2c 49 25 | 3a 44 25 3d 31 3a 4c 3d |,E%,L,I%|:D%=1:L=|
|000007b0| 31 30 30 2f 28 74 6f 25 | 2d 66 72 6f 6d 25 29 0d |100/(to%|-from%).|
|000007c0| 02 bc 0c 73 25 3d 66 72 | 6f 6d 25 0d 02 c6 19 c8 |...s%=fr|om%.....|
|000007d0| 99 20 22 48 6f 75 72 67 | 6c 61 73 73 5f 4c 45 44 |. "Hourg|lass_LED|
|000007e0| 73 22 2c 32 0d 02 d0 0f | f2 5f 65 73 63 61 70 65 |s",2....|._escape|
|000007f0| 5f 6f 6e 0d 02 da 1b c8 | 99 20 22 4e 75 6d 5f 53 |_on.....|. "Num_S|
|00000800| 65 74 22 2c 6d 65 73 73 | 61 67 65 25 2c 31 0d 02 |et",mess|age%,1..|
|00000810| e4 18 c8 99 20 22 4e 75 | 6d 5f 53 65 74 22 2c 74 |.... "Nu|m_Set",t|
|00000820| 65 6d 70 25 2c 31 0d 02 | ee 1d e7 20 66 72 6f 6d |emp%,1..|... from|
|00000830| 25 3e 3d 74 6f 25 2d 31 | 20 85 20 32 2c 22 45 4d |%>=to%-1| . 2,"EM|
|00000840| 50 3a 22 0d 02 f8 14 c8 | 99 22 48 6f 75 72 67 6c |P:".....|."Hourgl|
|00000850| 61 73 73 5f 4f 6e 22 0d | 03 02 14 e3 20 49 25 3d |ass_On".|.... I%=|
|00000860| 66 72 6f 6d 25 20 b8 20 | 74 6f 25 0d 03 0c 0b 20 |from% . |to%.... |
|00000870| 43 25 3d 3f 49 25 0d 03 | 16 36 20 e7 20 28 49 25 |C%=?I%..|.6 . (I%|
|00000880| 83 32 30 30 29 3d 30 c8 | 99 20 48 6f 75 72 67 6c |.200)=0.|. Hourgl|
|00000890| 61 73 73 5f 50 65 72 63 | 65 6e 74 61 67 65 25 2c |ass_Perc|entage%,|
|000008a0| 28 49 25 2d 66 72 6f 6d | 25 29 2a 4c 0d 03 20 1c |(I%-from|%)*L.. .|
|000008b0| 20 e7 20 43 25 3e 33 32 | 20 80 20 43 25 3c 31 32 | . C%>32| . C%<12|
|000008c0| 38 20 8c 20 f2 5f 63 75 | 0d 03 2a 06 20 ed 0d 03 |8 . ._cu|..*. ...|
|000008d0| 34 08 f2 5f 6e 75 0d 03 | 3e 10 f2 5f 65 73 63 61 |4.._nu..|>.._esca|
|000008e0| 70 65 5f 6f 66 66 0d 03 | 48 15 c8 99 22 48 6f 75 |pe_off..|H..."Hou|
|000008f0| 72 67 6c 61 73 73 5f 4f | 66 66 22 0d 03 52 0e 3a |rglass_O|ff"..R.:|
|00000900| 3d 6d 65 73 73 61 67 65 | 25 0d 03 5c 04 0d 03 66 |=message|%..\...f|
|00000910| 0a dd 20 f2 5f 63 75 0d | 03 70 0f 44 25 3d 44 25 |.. ._cu.|.p.D%=D%|
|00000920| 2a 45 25 2b 43 25 0d 03 | 7a 09 45 25 2b 3d 31 0d |*E%+C%..|z.E%+=1.|
|00000930| 03 84 12 e7 20 45 25 3d | 31 30 20 8c 20 f2 5f 6e |.... E%=|10 . ._n|
|00000940| 75 0d 03 8e 05 e1 0d 03 | 98 04 0d 03 a2 0a dd 20 |u.......|....... |
|00000950| f2 5f 6e 75 0d 03 ac 2b | c8 99 20 4e 75 6d 5f 53 |._nu...+|.. Num_S|
|00000960| 63 61 6c 61 72 4d 75 6c | 25 20 2c 6d 65 73 73 61 |calarMul|% ,messa|
|00000970| 67 65 25 2c 44 25 2c 6d | 65 73 73 61 67 65 25 0d |ge%,D%,m|essage%.|
|00000980| 03 b6 2e c8 99 20 4e 75 | 6d 5f 41 64 64 25 20 20 |..... Nu|m_Add% |
|00000990| 20 20 20 20 20 2c 6d 65 | 73 73 61 67 65 25 2c 74 | ,me|ssage%,t|
|000009a0| 65 6d 70 25 2c 6d 65 73 | 73 61 67 65 25 0d 03 c0 |emp%,mes|sage%...|
|000009b0| 35 c8 99 20 4e 75 6d 5f | 4d 6f 64 25 20 20 20 20 |5.. Num_|Mod% |
|000009c0| 20 20 20 2c 6d 65 73 73 | 61 67 65 25 2c 70 75 62 | ,mess|age%,pub|
|000009d0| 6c 69 63 5f 6b 65 79 31 | 25 2c 6d 65 73 73 61 67 |lic_key1|%,messag|
|000009e0| 65 25 0d 03 ca 24 c8 99 | 20 4e 75 6d 5f 53 63 61 |e%...$..| Num_Sca|
|000009f0| 6c 61 72 41 64 64 25 20 | 2c 74 65 6d 70 25 2c 31 |larAdd% |,temp%,1|
|00000a00| 2c 74 65 6d 70 25 0d 03 | d4 08 45 25 3d 30 0d 03 |,temp%..|..E%=0..|
|00000a10| de 08 44 25 3d 31 0d 03 | e8 05 e1 0d 03 f2 04 0d |..D%=1..|........|
|00000a20| 03 fc 26 dd 20 a4 5f 73 | 69 67 6e 28 66 72 6f 6d |..&. ._s|ign(from|
|00000a30| 25 2c 74 6f 25 20 2c 73 | 65 63 72 65 74 24 2c 6b |%,to% ,s|ecret$,k|
|00000a40| 65 79 31 24 29 0d 04 06 | 14 c8 99 22 48 6f 75 72 |ey1$)...|..."Hour|
|00000a50| 67 6c 61 73 73 5f 4f 6e | 22 0d 04 10 18 c8 99 22 |glass_On|"......"|
|00000a60| 48 6f 75 72 67 6c 61 73 | 73 5f 4c 45 44 73 22 2c |Hourglas|s_LEDs",|
|00000a70| 31 0d 04 1a 0f f2 5f 65 | 73 63 61 70 65 5f 6f 6e |1....._e|scape_on|
|00000a80| 0d 04 24 26 f2 5f 72 65 | 61 64 5f 62 69 67 28 73 |..$&._re|ad_big(s|
|00000a90| 65 63 72 65 74 5f 6b 65 | 79 25 20 20 2c 20 73 65 |ecret_ke|y% , se|
|00000aa0| 63 72 65 74 24 29 0d 04 | 2e 29 f2 5f 72 65 61 64 |cret$)..|.)._read|
|00000ab0| 5f 62 69 67 28 74 65 6d | 70 25 20 20 20 20 20 20 |_big(tem|p% |
|00000ac0| 20 20 2c 20 70 61 73 73 | 77 6f 72 64 24 20 29 0d | , pass|word$ ).|
|00000ad0| 04 38 2e c8 99 20 20 4e | 75 6d 5f 41 64 64 25 2c |.8... N|um_Add%,|
|00000ae0| 73 65 63 72 65 74 5f 6b | 65 79 25 2c 74 65 6d 70 |secret_k|ey%,temp|
|00000af0| 25 2c 73 65 63 72 65 74 | 5f 6b 65 79 25 0d 04 42 |%,secret|_key%..B|
|00000b00| 22 f2 5f 72 65 61 64 5f | 62 69 67 28 70 75 62 6c |"._read_|big(publ|
|00000b10| 69 63 5f 6b 65 79 31 25 | 2c 6b 65 79 31 24 29 0d |ic_key1%|,key1$).|
|00000b20| 04 4c 34 6d 65 73 73 61 | 67 65 25 3d a4 5f 63 6f |.L4messa|ge%=._co|
|00000b30| 75 6e 74 5f 6d 65 73 73 | 61 67 65 28 66 72 6f 6d |unt_mess|age(from|
|00000b40| 25 2c 74 6f 25 2c 70 75 | 62 6c 69 63 5f 6b 65 79 |%,to%,pu|blic_key|
|00000b50| 31 25 29 0d 04 56 18 c8 | 99 22 48 6f 75 72 67 6c |1%)..V..|."Hourgl|
|00000b60| 61 73 73 5f 4c 45 44 73 | 22 2c 31 0d 04 60 40 c8 |ass_LEDs|",1..`@.|
|00000b70| 99 20 22 4e 75 6d 5f 50 | 6f 77 4d 6f 64 22 2c 6d |. "Num_P|owMod",m|
|00000b80| 65 73 73 61 67 65 25 2c | 73 65 63 72 65 74 5f 6b |essage%,|secret_k|
|00000b90| 65 79 25 2c 70 75 62 6c | 69 63 5f 6b 65 79 31 25 |ey%,publ|ic_key1%|
|00000ba0| 2c 73 69 67 6e 61 74 75 | 72 65 25 0d 04 6a 10 f2 |,signatu|re%..j..|
|00000bb0| 5f 65 73 63 61 70 65 5f | 6f 66 66 0d 04 74 15 c8 |_escape_|off..t..|
|00000bc0| 99 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 66 66 22 |."Hourgl|ass_Off"|
|00000bd0| 0d 04 7e 21 3a 3d a4 63 | 68 6f 72 74 28 a4 73 74 |..~!:=.c|hort(.st|
|00000be0| 72 69 6e 67 28 73 69 67 | 6e 61 74 75 72 65 25 29 |ring(sig|nature%)|
|00000bf0| 29 0d 04 88 04 0d 04 92 | 34 dd 20 a4 5f 63 68 65 |).......|4. ._che|
|00000c00| 63 6b 5f 73 69 67 6e 28 | 66 72 6f 6d 25 2c 74 6f |ck_sign(|from%,to|
|00000c10| 25 2c 6b 65 79 32 24 2c | 6b 65 79 31 24 2c 73 69 |%,key2$,|key1$,si|
|00000c20| 67 6e 61 74 75 72 65 24 | 29 0d 04 9c 14 c8 99 22 |gnature$|)......"|
|00000c30| 48 6f 75 72 67 6c 61 73 | 73 5f 4f 6e 22 0d 04 a6 |Hourglas|s_On"...|
|00000c40| 18 c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 4c 45 |..."Hour|glass_LE|
|00000c50| 44 73 22 2c 31 0d 04 b0 | 0f f2 5f 65 73 63 61 70 |Ds",1...|.._escap|
|00000c60| 65 5f 6f 6e 0d 04 ba 22 | f2 5f 72 65 61 64 5f 62 |e_on..."|._read_b|
|00000c70| 69 67 28 70 75 62 6c 69 | 63 5f 6b 65 79 32 25 2c |ig(publi|c_key2%,|
|00000c80| 6b 65 79 32 24 29 0d 04 | c4 22 f2 5f 72 65 61 64 |key2$)..|."._read|
|00000c90| 5f 62 69 67 28 70 75 62 | 6c 69 63 5f 6b 65 79 31 |_big(pub|lic_key1|
|00000ca0| 25 2c 6b 65 79 31 24 29 | 0d 04 ce 2d f2 5f 72 65 |%,key1$)|...-._re|
|00000cb0| 61 64 5f 62 69 67 28 73 | 69 67 6e 61 74 75 72 65 |ad_big(s|ignature|
|00000cc0| 25 2c a4 63 68 61 6c 6c | 28 73 69 67 6e 61 74 75 |%,.chall|(signatu|
|00000cd0| 72 65 24 29 29 0d 04 d8 | 34 6d 65 73 73 61 67 65 |re$))...|4message|
|00000ce0| 25 3d a4 5f 63 6f 75 6e | 74 5f 6d 65 73 73 61 67 |%=._coun|t_messag|
|00000cf0| 65 28 66 72 6f 6d 25 2c | 74 6f 25 2c 70 75 62 6c |e(from%,|to%,publ|
|00000d00| 69 63 5f 6b 65 79 31 25 | 29 0d 04 e2 18 c8 99 22 |ic_key1%|)......"|
|00000d10| 48 6f 75 72 67 6c 61 73 | 73 5f 4c 45 44 73 22 2c |Hourglas|s_LEDs",|
|00000d20| 31 0d 04 ec 3e c8 99 20 | 22 4e 75 6d 5f 50 6f 77 |1...>.. |"Num_Pow|
|00000d30| 4d 6f 64 22 2c 73 69 67 | 6e 61 74 75 72 65 25 2c |Mod",sig|nature%,|
|00000d40| 70 75 62 6c 69 63 5f 6b | 65 79 32 25 2c 70 75 62 |public_k|ey2%,pub|
|00000d50| 6c 69 63 5f 6b 65 79 31 | 25 2c 74 65 6d 70 25 0d |lic_key1|%,temp%.|
|00000d60| 04 f6 10 f2 5f 65 73 63 | 61 70 65 5f 6f 66 66 0d |...._esc|ape_off.|
|00000d70| 05 00 15 c8 99 22 48 6f | 75 72 67 6c 61 73 73 5f |....."Ho|urglass_|
|00000d80| 4f 66 66 22 0d 05 0a 28 | 3a 3d 28 a4 73 74 72 69 |Off"...(|:=(.stri|
|00000d90| 6e 67 28 74 65 6d 70 25 | 29 3d a4 73 74 72 69 6e |ng(temp%|)=.strin|
|00000da0| 67 28 6d 65 73 73 61 67 | 65 25 29 29 0d 05 14 04 |g(messag|e%))....|
|00000db0| 0d 05 1e 1e dd 20 a4 63 | 68 6f 72 74 28 61 24 29 |..... .c|hort(a$)|
|00000dc0| 3a e7 20 ac 63 6f 72 64 | 25 20 3a 3d 61 24 0d 05 |:. .cord|% :=a$..|
|00000dd0| 28 10 ea 62 24 2c 41 24 | 3a 41 24 3d 61 24 0d 05 |(..b$,A$|:A$=a$..|
|00000de0| 32 05 f5 0d 05 3c 0f 20 | 62 25 3d bb c0 61 24 2c |2....<. |b%=..a$,|
|00000df0| 32 29 0d 05 46 20 20 e7 | 20 62 25 3c 39 34 20 80 |2)..F .| b%<94 .|
|00000e00| 20 a9 61 24 3e 3d 32 20 | 80 20 62 25 3c 3e 36 30 | .a$>=2 |. b%<>60|
|00000e10| 20 8c 0d 05 50 12 20 20 | 62 24 2b 3d bd 28 33 33 | ...P. |b$+=.(33|
|00000e20| 2b 62 25 29 0d 05 5a 0f | 20 20 61 24 3d c1 61 24 |+b%)..Z.| a$=.a$|
|00000e30| 2c 33 29 0d 05 64 07 20 | 20 cc 0d 05 6e 14 20 20 |,3)..d. | ...n. |
|00000e40| 62 24 2b 3d 22 20 22 2b | c0 61 24 2c 31 29 0d 05 |b$+=" "+|.a$,1)..|
|00000e50| 78 0f 20 20 61 24 3d c1 | 61 24 2c 32 29 0d 05 82 |x. a$=.|a$,2)...|
|00000e60| 07 20 20 cd 0d 05 8c 0b | 20 fd 61 24 3d 22 22 0d |. .....| .a$="".|
|00000e70| 05 96 07 3d 62 24 0d 05 | a0 04 0d 05 aa 1e dd 20 |...=b$..|....... |
|00000e80| a4 63 68 61 6c 6c 28 61 | 24 29 3a e7 20 ac 63 6f |.chall(a|$):. .co|
|00000e90| 72 64 25 20 3a 3d 61 24 | 0d 05 b4 10 ea 62 24 2c |rd% :=a$|.....b$,|
|00000ea0| 41 24 3a 41 24 3d 61 24 | 0d 05 be 05 f5 0d 05 c8 |A$:A$=a$|........|
|00000eb0| 13 20 e7 20 c0 61 24 2c | 31 29 3d 22 20 22 20 8c |. . .a$,|1)=" " .|
|00000ec0| 0d 05 d2 12 20 20 62 24 | 2b 3d c1 61 24 2c 32 2c |.... b$|+=.a$,2,|
|00000ed0| 31 29 0d 05 dc 0f 20 20 | 61 24 3d c1 61 24 2c 33 |1).... |a$=.a$,3|
|00000ee0| 29 0d 05 e6 07 20 20 cc | 0d 05 f0 1b 20 20 62 24 |).... .|.... b$|
|00000ef0| 2b 3d c2 22 30 22 2b c3 | 28 97 61 24 2d 33 33 29 |+=."0"+.|(.a$-33)|
|00000f00| 2c 32 29 0d 05 fa 0f 20 | 20 61 24 3d c1 61 24 2c |,2).... | a$=.a$,|
|00000f10| 32 29 0d 06 04 07 20 20 | cd 0d 06 0e 0c 20 fd 20 |2).... |..... . |
|00000f20| 61 24 3d 22 22 0d 06 18 | 08 3a 3d 62 24 0d 06 22 |a$=""...|.:=b$.."|
|00000f30| 04 0d 06 2c 1d dd 20 f2 | 5f 72 65 61 64 5f 62 69 |...,.. .|_read_bi|
|00000f40| 67 28 70 6f 69 6e 74 65 | 72 25 2c 41 24 29 0d 06 |g(pointe|r%,A$)..|
|00000f50| 36 23 20 c8 99 22 4e 75 | 6d 5f 46 72 6f 6d 53 74 |6# .."Nu|m_FromSt|
|00000f60| 72 69 6e 67 22 2c 70 6f | 69 6e 74 65 72 25 2c 41 |ring",po|inter%,A|
|00000f70| 24 0d 06 40 06 20 e1 0d | 06 4a 04 0d 06 54 17 dd |$..@. ..|.J...T..|
|00000f80| 20 f2 5f 6c 6f 61 64 5f | 74 6f 6b 65 6e 73 28 66 | ._load_|tokens(f|
|00000f90| 24 29 0d 06 5e 0c 51 25 | 3d 8e 28 66 24 29 0d 06 |$)..^.Q%|=.(f$)..|
|00000fa0| 68 18 e7 20 51 25 3d 30 | 20 85 20 31 2c 22 4e 57 |h.. Q%=0| . 1,"NW|
|00000fb0| 46 3a 22 2b 66 24 0d 06 | 72 10 e3 20 49 25 3d 30 |F:"+f$..|r.. I%=0|
|00000fc0| 20 b8 20 39 39 39 0d 06 | 7c 14 20 74 6f 6b 65 6e | . 999..||. token|
|00000fd0| 24 28 49 25 29 3d be 23 | 51 25 0d 06 86 06 20 ed |$(I%)=.#|Q%.... .|
|00000fe0| 0d 06 90 08 d9 23 51 25 | 0d 06 9a 05 e1 0d 06 a4 |.....#Q%|........|
|00000ff0| 04 0d 06 ae 19 dd 20 f2 | 5f 73 69 67 6e 61 74 75 |...... .|_signatu|
|00001000| 72 65 73 28 66 69 6c 65 | 24 29 0d 06 b8 19 ea 20 |res(file|$)..... |
|00001010| 6c 65 6e 25 2c 41 25 2c | 42 25 2c 64 61 74 65 24 |len%,A%,|B%,date$|
|00001020| 2c 41 24 0d 06 c2 28 c8 | 99 22 4f 53 5f 46 69 6c |,A$...(.|."OS_Fil|
|00001030| 65 22 2c 31 37 2c 66 69 | 6c 65 24 20 b8 20 74 79 |e",17,fi|le$ . ty|
|00001040| 70 65 25 2c 2c 2c 2c 6c | 65 6e 25 0d 06 cc 1f e7 |pe%,,,,l|en%.....|
|00001050| 20 74 79 70 65 25 3c 3e | 31 20 85 20 32 2c 22 53 | type%<>|1 . 2,"S|
|00001060| 46 4e 3a 22 2b 66 69 6c | 65 24 0d 06 d6 12 6c 65 |FN:"+fil|e$....le|
|00001070| 6e 25 3d 6c 65 6e 25 2a | 31 2e 32 30 0d 06 e0 25 |n%=len%*|1.20...%|
|00001080| c8 99 22 57 69 6d 70 5f | 53 6c 6f 74 53 69 7a 65 |.."Wimp_|SlotSize|
|00001090| 22 2c 2d 31 2c 2d 31 20 | b8 20 67 6f 74 74 65 6e |",-1,-1 |. gotten|
|000010a0| 25 0d 06 ea 23 e7 20 67 | 6f 74 74 65 6e 25 2d 6d |%...#. g|otten%-m|
|000010b0| 79 5f 61 70 70 25 3c 6c | 65 6e 25 2b 63 68 75 6e |y_app%<l|en%+chun|
|000010c0| 6b 25 20 8c 0d 06 f4 3f | 20 c8 99 22 57 69 6d 70 |k% ....?| .."Wimp|
|000010d0| 5f 53 6c 6f 74 53 69 7a | 65 22 2c 34 2a 28 28 6d |_SlotSiz|e",4*((m|
|000010e0| 79 5f 61 70 70 25 2b 6c | 65 6e 25 2b 63 68 75 6e |y_app%+l|en%+chun|
|000010f0| 6b 25 29 81 34 29 2c 2d | 31 20 b8 20 67 6f 74 74 |k%).4),-|1 . gott|
|00001100| 65 6e 25 0d 06 fe 2e 20 | e7 20 67 6f 74 74 65 6e |en%.... |. gotten|
|00001110| 25 3c 34 2a 28 28 6d 79 | 5f 61 70 70 25 2b 6c 65 |%<4*((my|_app%+le|
|00001120| 6e 25 29 81 34 29 20 85 | 20 31 2c 22 4e 4d 45 3a |n%).4) .| 1,"NME:|
|00001130| 22 0d 07 08 06 20 cd 0d | 07 12 11 73 69 67 6e 73 |".... ..|...signs|
|00001140| 25 3d 68 69 6d 65 6d 25 | 0d 07 1c 12 68 69 6d 65 |%=himem%|....hime|
|00001150| 6d 25 2b 3d 6c 65 6e 25 | 2b 34 0d 07 26 13 6d 79 |m%+=len%|+4..&.my|
|00001160| 5f 61 70 70 25 2b 3d 6c | 65 6e 25 2b 34 0d 07 30 |_app%+=l|en%+4..0|
|00001170| 1f c8 99 22 4f 53 5f 46 | 69 6c 65 22 2c 31 36 2c |..."OS_F|ile",16,|
|00001180| 66 69 6c 65 24 2c 73 69 | 67 6e 73 25 0d 07 3a 13 |file$,si|gns%..:.|
|00001190| 73 69 67 6e 73 5f 6c 65 | 6e 25 3d 6c 65 6e 25 0d |signs_le|n%=len%.|
|000011a0| 07 44 0d 41 25 3d 73 69 | 67 6e 73 25 0d 07 4e 18 |.D.A%=si|gns%..N.|
|000011b0| 42 25 3d 73 69 67 6e 73 | 25 2b 73 69 67 6e 73 5f |B%=signs|%+signs_|
|000011c0| 6c 65 6e 25 0d 07 58 0c | d6 20 63 6c 65 61 6e 25 |len%..X.|. clean%|
|000011d0| 0d 07 62 11 f4 20 6d 61 | 6b 65 20 6d 65 6e 75 2e |..b.. ma|ke menu.|
|000011e0| 2e 0d 07 6c 15 49 25 3d | 31 3a 6c 69 73 74 5f 69 |...l.I%=|1:list_i|
|000011f0| 74 65 6d 25 3d 30 0d 07 | 76 05 f5 0d 07 80 16 20 |tem%=0..|v...... |
|00001200| 41 24 3d 24 41 25 20 3a | 41 25 2b 3d a9 41 24 2b |A$=$A% :|A%+=.A$+|
|00001210| 31 0d 07 8a 3d 20 e7 20 | c0 41 24 2c 32 29 3d 22 |1...= . |.A$,2)="|
|00001220| 69 3d 22 20 8c 20 f2 5f | 61 64 64 5f 6d 65 6e 75 |i=" . ._|add_menu|
|00001230| 28 6c 69 73 74 5f 4d 25 | 2c c1 41 24 2c 33 29 29 |(list_M%|,.A$,3))|
|00001240| 3a 6c 69 73 74 5f 69 74 | 65 6d 25 2b 3d 31 0d 07 |:list_it|em%+=1..|
|00001250| 94 14 20 e7 20 c0 41 24 | 2c 32 29 3d 22 64 3d 22 |.. . .A$|,2)="d="|
|00001260| 20 8c 0d 07 9e 38 20 20 | 20 e7 20 64 61 74 65 24 | ....8 | . date$|
|00001270| 3c 3e 22 22 20 8c 20 f2 | 5f 49 6e 66 6f 72 6d 28 |<>"" . .|_Inform(|
|00001280| a4 54 28 22 44 44 4c 3a | 22 29 29 20 8b 20 64 61 |.T("DDL:|")) . da|
|00001290| 74 65 24 3d c1 41 24 2c | 33 29 0d 07 a8 08 20 20 |te$=.A$,|3).... |
|000012a0| 20 cd 0d 07 b2 0c 20 fd | 20 41 25 3e 42 25 0d 07 | ..... .| A%>B%..|
|000012b0| bc 1f e7 20 64 61 74 65 | 24 3d 22 22 20 64 61 74 |... date|$="" dat|
|000012c0| 65 24 3d a4 54 28 22 75 | 6e 64 3a 22 29 0d 07 c6 |e$=.T("u|nd:")...|
|000012d0| 19 f2 5f 49 74 65 78 74 | 28 6d 65 25 2c 31 36 2c |.._Itext|(me%,16,|
|000012e0| 64 61 74 65 24 29 0d 07 | d0 22 f2 5f 49 74 65 78 |date$)..|."._Itex|
|000012f0| 74 28 6c 6f 61 64 69 6e | 67 25 2c 33 2c a4 54 28 |t(loadin|g%,3,.T(|
|00001300| 22 73 74 43 3a 22 29 29 | 0d 07 da 22 f2 5f 70 72 |"stC:"))|..."._pr|
|00001310| 6f 63 65 73 73 28 35 2c | 73 69 67 6e 73 25 2c 73 |ocess(5,|signs%,s|
|00001320| 69 67 6e 73 5f 6c 65 6e | 25 29 0d 07 e4 10 e7 20 |igns_len|%)..... |
|00001330| 75 6e 6b 6e 6f 77 6e 25 | 20 8c 0d 07 ee 20 20 20 |unknown%| .... |
|00001340| f2 5f 49 74 65 78 74 28 | 6d 65 25 2c 31 37 2c a4 |._Itext(|me%,17,.|
|00001350| 54 28 22 4e 4c 44 3a 22 | 29 29 0d 07 f8 07 20 20 |T("NLD:"|)).... |
|00001360| cc 0d 08 02 16 20 20 20 | 20 20 e7 20 75 6e 73 69 |..... | . unsi|
|00001370| 67 6e 65 64 25 20 8c 0d | 08 0c 24 20 20 20 20 20 |gned% ..|..$ |
|00001380| 20 f2 5f 49 74 65 78 74 | 28 6d 65 25 2c 31 37 2c | ._Itext|(me%,17,|
|00001390| a4 54 28 22 4c 4e 53 3a | 22 29 29 0d 08 16 0b 20 |.T("LNS:|")).... |
|000013a0| 20 20 20 20 20 cc 0d 08 | 20 19 20 20 20 20 20 20 | ...| . |
|000013b0| e7 20 6c 61 73 74 5f 63 | 68 65 63 6b 25 20 8c 0d |. last_c|heck% ..|
|000013c0| 08 2a 26 20 20 20 20 20 | 20 20 20 f2 5f 49 74 65 |.*& | ._Ite|
|000013d0| 78 74 28 6d 65 25 2c 31 | 37 2c a4 54 28 22 4c 4f |xt(me%,1|7,.T("LO|
|000013e0| 4b 3a 22 29 29 0d 08 34 | 0d 20 20 20 20 20 20 20 |K:"))..4|. |
|000013f0| 20 cc 0d 08 3e 26 20 20 | 20 20 20 20 20 20 f2 5f | ...>& | ._|
|00001400| 49 74 65 78 74 28 6d 65 | 25 2c 31 37 2c a4 54 28 |Itext(me|%,17,.T(|
|00001410| 22 4c 54 57 3a 22 29 29 | 0d 08 48 23 20 20 20 20 |"LTW:"))|..H# |
|00001420| 20 20 20 20 e7 20 a4 5f | 61 73 6b 28 a4 54 28 22 | . ._|ask(.T("|
|00001430| 73 74 76 3a 22 29 29 3d | 30 20 e0 0d 08 52 0d 20 |stv:"))=|0 ...R. |
|00001440| 20 20 20 20 20 20 20 cd | 0d 08 5c 0b 20 20 20 20 | .|..\. |
|00001450| 20 20 cd 0d 08 66 07 20 | 20 cd 0d 08 70 0d 41 25 | ...f. | ...p.A%|
|00001460| 3d 73 69 67 6e 73 25 0d | 08 7a 05 f5 0d 08 84 0b |=signs%.|.z......|
|00001470| 20 41 24 3d 24 41 25 0d | 08 8e 32 20 e7 20 c0 41 | A$=$A%.|..2 . .A|
|00001480| 24 2c 32 29 3d 22 69 3d | 22 20 8c 20 24 41 25 3d |$,2)="i=|" . $A%=|
|00001490| 22 69 3d 22 2b a4 5f 6c | 6f 77 65 72 5f 63 61 73 |"i="+._l|ower_cas|
|000014a0| 65 28 c1 41 24 2c 33 29 | 29 0d 08 98 0e 20 41 25 |e(.A$,3)|).... A%|
|000014b0| 2b 3d a9 41 24 2b 31 0d | 08 a2 1c 20 fd 20 41 25 |+=.A$+1.|... . A%|
|000014c0| 3e 3d 73 69 67 6e 73 25 | 2b 73 69 67 6e 73 5f 6c |>=signs%|+signs_l|
|000014d0| 65 6e 25 0d 08 ac 05 e1 | 0d 08 b6 04 0d 08 c0 0f |en%.....|........|
|000014e0| dd 20 f2 5f 70 72 69 76 | 61 74 65 0d 08 ca 0d ea |. ._priv|ate.....|
|000014f0| 20 61 31 24 2c 61 32 24 | 0d 08 d4 1b 51 25 3d 8e | a1$,a2$|....Q%=.|
|00001500| 28 6d 79 64 69 72 24 2b | 22 2e 70 72 69 76 61 74 |(mydir$+|".privat|
|00001510| 65 22 29 0d 08 de 15 e7 | 20 51 25 3d 30 20 85 20 |e").....| Q%=0 . |
|00001520| 31 2c 22 50 46 4e 3a 22 | 0d 08 e8 0f 6d 79 5f 6b |1,"PFN:"|....my_k|
|00001530| 65 79 31 24 3d 22 22 0d | 08 f2 0f 6d 79 5f 6b 65 |ey1$="".|...my_ke|
|00001540| 79 32 24 3d 22 22 0d 08 | fc 0d 6f 77 6e 65 72 24 |y2$=""..|..owner$|
|00001550| 3d 22 22 0d 09 06 0e 73 | 65 63 72 65 74 24 3d 22 |=""....s|ecret$="|
|00001560| 22 0d 09 10 05 f5 0d 09 | 1a 0c 20 41 24 3d be 23 |".......|.. A$=.#|
|00001570| 51 25 0d 09 24 10 20 c8 | 8e 20 c0 41 24 2c 32 29 |Q%..$. .|. .A$,2)|
|00001580| 20 ca 0d 09 2e 21 20 20 | c9 20 22 49 3d 22 2c 22 | ....! |. "I=","|
|00001590| 69 3d 22 20 20 3a 6f 77 | 6e 65 72 24 3d c1 41 24 |i=" :ow|ner$=.A$|
|000015a0| 2c 33 29 0d 09 38 22 20 | 20 c9 20 22 44 3d 22 2c |,3)..8" | . "D=",|
|000015b0| 22 64 3d 22 20 20 3a 73 | 65 63 72 65 74 24 3d c1 |"d=" :s|ecret$=.|
|000015c0| 41 24 2c 33 29 0d 09 42 | 1e 20 20 c9 20 22 4e 3d |A$,3)..B|. . "N=|
|000015d0| 22 2c 22 6e 3d 22 20 20 | 3a 61 31 24 3d c1 41 24 |","n=" |:a1$=.A$|
|000015e0| 2c 33 29 0d 09 4c 1e 20 | 20 c9 20 22 45 3d 22 2c |,3)..L. | . "E=",|
|000015f0| 22 65 3d 22 20 20 3a 61 | 32 24 3d c1 41 24 2c 33 |"e=" :a|2$=.A$,3|
|00001600| 29 0d 09 56 2d 20 20 c9 | 20 22 25 25 22 2c 22 22 |)..V- .| "%%",""|
|00001610| 20 20 20 20 3a f4 20 4a | 75 73 74 20 63 6f 6d 6d | :. J|ust comm|
|00001620| 65 6e 74 20 79 6f 75 20 | 6b 6e 6f 77 20 21 0d 09 |ent you |know !..|
|00001630| 60 1a 20 20 7f 20 d9 23 | 51 25 3a 85 20 31 2c 22 |`. . .#|Q%:. 1,"|
|00001640| 55 54 46 3a 22 2b 41 24 | 0d 09 6a 07 20 20 cb 0d |UTF:"+A$|..j. ..|
|00001650| 09 74 0b 20 fd 20 c5 23 | 51 25 0d 09 7e 08 d9 23 |.t. . .#|Q%..~..#|
|00001660| 51 25 0d 09 88 1b e7 20 | 6f 77 6e 65 72 24 3d 22 |Q%..... |owner$="|
|00001670| 22 20 20 85 20 31 2c 22 | 4f 4e 44 3a 22 0d 09 92 |" . 1,"|OND:"...|
|00001680| 1b e7 20 73 65 63 72 65 | 74 24 3d 22 22 20 85 20 |.. secre|t$="" . |
|00001690| 31 2c 22 53 4e 44 3a 22 | 0d 09 9c 1e f2 5f 49 74 |1,"SND:"|....._It|
|000016a0| 65 78 74 28 6c 6f 61 64 | 69 6e 67 25 2c 32 2c 6f |ext(load|ing%,2,o|
|000016b0| 77 6e 65 72 24 29 0d 09 | a6 31 46 25 3d a4 5f 66 |wner$)..|.1F%=._f|
|000016c0| 69 6e 64 5f 73 69 67 6e | 61 74 75 72 65 28 6f 77 |ind_sign|ature(ow|
|000016d0| 6e 65 72 24 2c 6d 79 5f | 6b 65 79 31 24 2c 6d 79 |ner$,my_|key1$,my|
|000016e0| 5f 6b 65 79 32 24 29 0d | 09 b0 0a e7 20 46 25 20 |_key2$).|.... F% |
|000016f0| 8c 0d 09 ba 26 20 e7 20 | 61 31 24 3c 3e 6d 79 5f |....& . |a1$<>my_|
|00001700| 6b 65 79 31 24 20 84 20 | 61 32 24 3c 3e 6d 79 5f |key1$ . |a2$<>my_|
|00001710| 6b 65 79 32 24 20 8c 0d | 09 c4 1b 20 20 20 f2 5f |key2$ ..|... ._|
|00001720| 49 6e 66 6f 72 6d 28 a4 | 54 28 22 50 4b 57 3a 22 |Inform(.|T("PKW:"|
|00001730| 29 29 0d 09 ce 13 20 20 | 20 6d 79 5f 6b 65 79 31 |)).... | my_key1|
|00001740| 24 3d 61 31 24 0d 09 d8 | 13 20 20 20 6d 79 5f 6b |$=a1$...|. my_k|
|00001750| 65 79 32 24 3d 61 32 24 | 0d 09 e2 31 20 20 20 f2 |ey2$=a2$|...1 .|
|00001760| 5f 49 74 65 78 74 28 6d | 65 25 2c 31 30 2c 22 4e |_Itext(m|e%,10,"N|
|00001770| 6f 2c 20 44 69 73 74 72 | 69 62 75 74 65 20 79 6f |o, Distr|ibute yo|
|00001780| 75 72 20 6b 65 79 21 22 | 29 0d 09 ec 08 20 20 20 |ur key!"|).... |
|00001790| cc 0d 09 f6 27 20 20 20 | f2 5f 49 74 65 78 74 28 |....' |._Itext(|
|000017a0| 6d 65 25 2c 31 30 2c 22 | 59 65 73 2c 20 61 6c 6c |me%,10,"|Yes, all|
|000017b0| 20 63 6f 6f 6c 2e 22 29 | 0d 0a 00 08 20 20 20 cd | cool.")|.... .|
|000017c0| 0d 0a 0a 1c 20 41 24 3d | a4 5f 6c 6f 77 65 72 5f |.... A$=|._lower_|
|000017d0| 63 61 73 65 28 6f 77 6e | 65 72 24 29 0d 0a 14 18 |case(own|er$)....|
|000017e0| 20 e3 20 46 25 3d 31 20 | b8 20 6c 69 73 74 5f 69 | . F%=1 |. list_i|
|000017f0| 74 65 6d 25 0d 0a 1e 4a | 20 20 e7 20 a4 5f 6c 6f |tem%...J| . ._lo|
|00001800| 77 65 72 5f 63 61 73 65 | 28 a4 5f 4d 74 65 78 74 |wer_case|(._Mtext|
|00001810| 28 6c 69 73 74 5f 4d 25 | 2c 46 25 29 29 3d 41 24 |(list_M%|,F%))=A$|
|00001820| 20 8c 20 f2 5f 64 65 6c | 5f 6d 65 6e 75 5f 69 74 | . ._del|_menu_it|
|00001830| 65 6d 28 6c 69 73 74 5f | 4d 25 2c 46 25 29 0d 0a |em(list_|M%,F%)..|
|00001840| 28 07 20 20 ed 0d 0a 32 | 06 20 cc 0d 0a 3c 21 20 |(. ...2|. ...<! |
|00001850| f2 5f 49 74 65 78 74 28 | 6d 65 25 2c 31 30 2c 22 |._Itext(|me%,10,"|
|00001860| 4e 6f 74 20 46 6f 75 6e | 64 21 22 29 0d 0a 46 1e |Not Foun|d!")..F.|
|00001870| 20 6d 79 5f 6b 65 79 31 | 24 3d 61 31 24 3a 6d 79 | my_key1|$=a1$:my|
|00001880| 5f 6b 65 79 32 24 3d 61 | 32 24 0d 0a 50 21 20 e7 |_key2$=a|2$..P! .|
|00001890| 20 61 31 24 3d 22 22 20 | 84 20 61 32 24 3d 22 22 | a1$="" |. a2$=""|
|000018a0| 20 85 20 31 2c 22 43 4e | 4f 3a 22 0d 0a 5a 06 20 | . 1,"CN|O:"..Z. |
|000018b0| cd 0d 0a 64 1d f2 5f 4d | 74 65 78 74 28 6c 69 73 |...d.._M|text(lis|
|000018c0| 74 5f 4d 25 2c 30 2c 6f | 77 6e 65 72 24 29 0d 0a |t_M%,0,o|wner$)..|
|000018d0| 6e 19 f2 5f 49 74 65 78 | 74 28 6d 65 25 2c 32 2c |n.._Itex|t(me%,2,|
|000018e0| 6f 77 6e 65 72 24 29 0d | 0a 78 21 f2 5f 49 74 65 |owner$).|.x!._Ite|
|000018f0| 78 74 28 6d 65 25 2c 35 | 2c a4 63 75 74 28 6d 79 |xt(me%,5|,.cut(my|
|00001900| 5f 6b 65 79 31 24 29 29 | 0d 0a 82 21 f2 5f 49 74 |_key1$))|...!._It|
|00001910| 65 78 74 28 6d 65 25 2c | 36 2c a4 63 75 74 28 6d |ext(me%,|6,.cut(m|
|00001920| 79 5f 6b 65 79 32 24 29 | 29 0d 0a 8c 18 73 65 63 |y_key2$)|)....sec|
|00001930| 72 65 74 5f 6c 65 6e 25 | 3d a9 73 65 63 72 65 74 |ret_len%|=.secret|
|00001940| 24 0d 0a 96 24 e7 20 c0 | 73 65 63 72 65 74 24 2c |$...$. .|secret$,|
|00001950| 31 29 3d 22 2d 22 20 73 | 65 63 72 65 74 5f 6c 65 |1)="-" s|ecret_le|
|00001960| 6e 25 2d 3d 31 0d 0a a0 | 2e c8 99 22 4f 53 5f 46 |n%-=1...|..."OS_F|
|00001970| 69 6c 65 22 2c 31 37 2c | 6d 79 64 69 72 24 2b 22 |ile",17,|mydir$+"|
|00001980| 2e 70 72 69 76 61 74 65 | 22 20 b8 20 2c 2c 41 25 |.private|" . ,,A%|
|00001990| 2c 42 25 0d 0a aa 14 e7 | 20 41 25 3e 26 46 46 46 |,B%.....| A%>&FFF|
|000019a0| 30 30 30 30 30 20 8c 0d | 0a b4 10 20 62 6c 6f 63 |00000 ..|... bloc|
|000019b0| 6b 25 21 30 3d 42 25 0d | 0a be 14 20 62 6c 6f 63 |k%!0=B%.|... bloc|
|000019c0| 6b 25 3f 34 3d 41 25 83 | 32 35 36 0d 0a c8 1d 20 |k%?4=A%.|256.... |
|000019d0| 70 72 69 76 5f 74 69 6d | 65 3d a4 5f 73 65 63 73 |priv_tim|e=._secs|
|000019e0| 28 62 6c 6f 63 6b 25 29 | 0d 0a d2 06 20 cc 0d 0a |(block%)|.... ...|
|000019f0| dc 10 20 70 72 69 76 5f | 74 69 6d 65 3d 30 0d 0a |.. priv_|time=0..|
|00001a00| e6 2f 20 85 20 31 2c 22 | 50 6c 65 61 73 65 20 54 |./ . 1,"|Please T|
|00001a10| 49 4d 45 2d 53 54 41 4d | 50 20 74 68 65 20 66 69 |IME-STAM|P the fi|
|00001a20| 6c 65 20 27 50 72 69 76 | 61 74 65 27 22 0d 0a f0 |le 'Priv|ate'"...|
|00001a30| 06 20 cd 0d 0a fa 14 f2 | 5f 73 70 65 6c 6c 5f 6f |. ......|_spell_o|
|00001a40| 75 74 5f 74 69 6d 65 0d | 0b 04 05 e1 0d 0b 0e 04 |ut_time.|........|
|00001a50| 0d 0b 18 16 dd 20 f2 5f | 73 70 65 6c 6c 5f 6f 75 |..... ._|spell_ou|
|00001a60| 74 5f 74 69 6d 65 0d 0b | 22 07 ea 20 41 0d 0b 2c |t_time..|".. A..,|
|00001a70| 2b 20 62 6c 6f 63 6b 25 | 21 31 30 30 3d 33 3a 62 |+ block%|!100=3:b|
|00001a80| 6c 6f 63 6b 25 21 31 30 | 34 3d 30 3a 62 6c 6f 63 |lock%!10|4=0:bloc|
|00001a90| 6b 25 21 31 30 38 3d 30 | 0d 0b 36 1e 20 c8 99 22 |k%!108=0|..6. .."|
|00001aa0| 4f 53 5f 57 6f 72 64 22 | 2c 31 34 2c 62 6c 6f 63 |OS_Word"|,14,bloc|
|00001ab0| 6b 25 2b 31 30 30 0d 0b | 40 23 20 41 3d a4 5f 73 |k%+100..|@# A=._s|
|00001ac0| 65 63 73 28 62 6c 6f 63 | 6b 25 2b 31 30 30 29 2d |ecs(bloc|k%+100)-|
|00001ad0| 70 72 69 76 5f 74 69 6d | 65 0d 0b 4a 0c 20 e7 20 |priv_tim|e..J. . |
|00001ae0| 41 3c 30 20 8c 0d 0b 54 | 3d 20 20 20 f2 5f 49 74 |A<0 ...T|= ._It|
|00001af0| 65 78 74 28 6d 65 25 2c | 31 31 2c 22 46 75 74 75 |ext(me%,|11,"Futu|
|00001b00| 72 65 2c 20 54 68 65 20 | 54 69 6d 65 20 57 61 72 |re, The |Time War|
|00001b10| 70 20 48 61 73 20 48 61 | 70 70 65 6e 65 64 20 21 |p Has Ha|ppened !|
|00001b20| 22 29 0d 0b 5e 08 20 20 | 20 cc 0d 0b 68 20 20 20 |")..^. | ...h |
|00001b30| 20 f2 5f 49 74 65 78 74 | 28 6d 65 25 2c 31 31 2c | ._Itext|(me%,11,|
|00001b40| a4 5f 74 69 6d 65 28 41 | 29 29 0d 0b 72 08 20 20 |._time(A|))..r. |
|00001b50| 20 cd 0d 0b 7c 06 20 cc | 0d 0b 86 1e 20 f2 5f 49 | ...|. .|.... ._I|
|00001b60| 74 65 78 74 28 6d 65 25 | 2c 31 31 2c 22 4e 6f 74 |text(me%|,11,"Not|
|00001b70| 20 53 65 74 22 29 0d 0b | 90 06 20 cd 0d 0b 9a 05 | Set")..|.. .....|
|00001b80| e1 0d 0b a4 04 0d 0b ae | 1c dd 20 a4 63 75 74 28 |........|.. .cut(|
|00001b90| 61 24 29 3a e7 20 a9 61 | 24 3c 32 30 20 3a 3d 61 |a$):. .a|$<20 :=a|
|00001ba0| 24 0d 0b b8 20 3d c0 61 | 24 2c a9 61 24 81 32 29 |$... =.a|$,.a$.2)|
|00001bb0| 2b 22 20 22 2b c1 61 24 | 2c a9 61 24 81 32 2b 31 |+" "+.a$|,.a$.2+1|
|00001bc0| 29 0d 0b c2 14 dd 20 a4 | 5f 73 65 63 73 28 62 6c |)..... .|_secs(bl|
|00001bd0| 6f 63 6b 25 29 0d 0b cc | 0a ea 20 43 2c 49 25 0d |ock%)...|.. C,I%.|
|00001be0| 0b d6 13 e3 20 49 25 3d | 34 20 b8 20 30 20 88 20 |.... I%=|4 . 0 . |
|00001bf0| 2d 31 0d 0b e0 16 20 43 | 3d 43 2a 32 35 36 2b 62 |-1.... C|=C*256+b|
|00001c00| 6c 6f 63 6b 25 3f 49 25 | 0d 0b ea 06 20 ed 0d 0b |lock%?I%|.... ...|
|00001c10| f4 0b 3a 3d 43 2f 31 30 | 30 0d 0b fe 04 0d 0c 08 |..:=C/10|0.......|
|00001c20| 0f dd 20 a4 5f 74 69 6d | 65 28 41 29 0d 0c 12 29 |.. ._tim|e(A)...)|
|00001c30| e7 20 41 3c 36 30 20 8c | 20 3a 3d 22 59 6f 75 27 |. A<60 .| :="You'|
|00001c40| 76 65 20 6a 75 73 74 20 | 63 68 61 6e 67 65 64 20 |ve just |changed |
|00001c50| 69 74 20 21 22 0d 0c 1c | 0a 41 3d 41 2f 36 30 0d |it !"...|.A=A/60.|
|00001c60| 0c 26 0c e7 20 41 3c 36 | 30 20 8c 0d 0c 30 47 20 |.&.. A<6|0 ...0G |
|00001c70| 20 e7 20 a8 28 41 2b 30 | 2e 35 29 3c 33 20 8c 20 | . .(A+0|.5)<3 . |
|00001c80| 3a 3d 22 6a 75 73 74 20 | 61 20 66 65 77 20 6d 69 |:="just |a few mi|
|00001c90| 6e 75 74 65 73 20 22 20 | 8b 20 3a 3d c3 28 a8 28 |nutes " |. :=.(.(|
|00001ca0| 41 2b 30 2e 35 29 29 2b | 22 20 6d 69 6e 75 74 65 |A+0.5))+|" minute|
|00001cb0| 73 22 0d 0c 3a 07 20 20 | cd 0d 0c 44 0a 41 3d 41 |s"..:. |...D.A=A|
|00001cc0| 2f 36 30 0d 0c 4e 0c e7 | 20 41 3c 32 34 20 8c 0d |/60..N..| A<24 ..|
|00001cd0| 0c 58 3f 20 20 e7 20 a8 | 28 41 2b 30 2e 35 29 3d |.X? . .|(A+0.5)=|
|00001ce0| 31 20 8c 20 3a 3d 22 61 | 6e 20 68 6f 75 72 20 6f |1 . :="a|n hour o|
|00001cf0| 72 20 73 6f 22 20 8b 20 | 3a 3d c3 28 a8 28 41 2b |r so" . |:=.(.(A+|
|00001d00| 30 2e 35 29 29 2b 22 20 | 68 6f 75 72 73 22 0d 0c |0.5))+" |hours"..|
|00001d10| 62 07 20 20 cd 0d 0c 6c | 0a 41 3d 41 2f 32 34 0d |b. ...l|.A=A/24.|
|00001d20| 0c 76 0c e7 20 41 3c 32 | 34 20 8c 0d 0c 80 3e 20 |.v.. A<2|4 ....> |
|00001d30| 20 e7 20 a8 28 41 2b 30 | 2e 35 29 3d 31 20 8c 20 | . .(A+0|.5)=1 . |
|00001d40| 3a 3d 22 6a 75 73 74 20 | 6f 6e 65 20 64 61 79 20 |:="just |one day |
|00001d50| 22 20 8b 20 3a 3d c3 28 | a8 28 41 2b 30 2e 35 29 |" . :=.(|.(A+0.5)|
|00001d60| 29 2b 22 20 64 61 79 73 | 22 0d 0c 8a 07 20 20 cd |)+" days|".... .|
|00001d70| 0d 0c 94 09 41 3d 41 2f | 37 0d 0c 9e 0b e7 20 41 |....A=A/|7..... A|
|00001d80| 3c 38 20 8c 0d 0c a8 3f | 20 20 e7 20 a8 28 41 2b |<8 ....?| . .(A+|
|00001d90| 30 2e 35 29 3d 31 20 8c | 20 3a 3d 22 61 62 6f 75 |0.5)=1 .| :="abou|
|00001da0| 74 20 61 20 77 65 65 6b | 20 22 20 8b 20 3a 3d c3 |t a week| " . :=.|
|00001db0| 28 a8 28 41 2b 30 2e 35 | 29 29 2b 22 20 77 65 65 |(.(A+0.5|))+" wee|
|00001dc0| 6b 73 22 0d 0c b2 07 20 | 20 cd 0d 0c bc 09 41 3d |ks".... | .....A=|
|00001dd0| 41 2f 34 0d 0c c6 0b e7 | 20 41 3c 38 20 8c 0d 0c |A/4.....| A<8 ...|
|00001de0| d0 40 20 20 e7 20 a8 28 | 41 2b 30 2e 35 29 3d 31 |.@ . .(|A+0.5)=1|
|00001df0| 20 8c 20 3a 3d 22 61 62 | 6f 75 74 20 61 20 6d 6f | . :="ab|out a mo|
|00001e00| 6e 74 68 22 20 8b 20 3a | 3d c3 28 a8 28 41 2b 30 |nth" . :|=.(.(A+0|
|00001e10| 2e 35 29 29 2b 22 20 6d | 6f 6e 74 68 73 22 0d 0c |.5))+" m|onths"..|
|00001e20| da 07 20 20 cd 0d 0c e4 | 0a 41 3d 41 2f 31 32 0d |.. ....|.A=A/12.|
|00001e30| 0c ee 0b e7 20 41 3c 33 | 20 8c 0d 0c f8 3f 20 20 |.... A<3| ....? |
|00001e40| e7 20 a8 28 41 2b 30 2e | 35 29 3d 31 20 8c 20 3a |. .(A+0.|5)=1 . :|
|00001e50| 3d 22 61 62 6f 75 74 20 | 61 20 79 65 61 72 20 22 |="about |a year "|
|00001e60| 20 8b 20 3a 3d c3 28 a8 | 28 41 2b 30 2e 35 29 29 | . :=.(.|(A+0.5))|
|00001e70| 2b 22 20 79 65 61 72 73 | 22 0d 0d 02 07 20 20 cd |+" years|".... .|
|00001e80| 0d 0d 0c 18 3a 3d 22 70 | 72 65 68 69 73 74 6f 72 |....:="p|rehistor|
|00001e90| 69 63 20 6d 61 6e 21 22 | 0d 0d 16 04 0d 0d 20 16 |ic man!"|...... .|
|00001ea0| dd 20 f2 5f 66 69 6c 6c | 5f 6f 75 74 5f 70 61 73 |. ._fill|_out_pas|
|00001eb0| 73 77 0d 0d 2a 18 f2 5f | 49 74 65 78 74 28 70 61 |sw..*.._|Itext(pa|
|00001ec0| 73 73 77 25 2c 32 2c 22 | 22 29 0d 0d 34 18 f2 5f |ssw%,2,"|")..4.._|
|00001ed0| 49 74 65 78 74 28 70 61 | 73 73 77 25 2c 33 2c 22 |Itext(pa|ssw%,3,"|
|00001ee0| 22 29 0d 0d 3e 18 f2 5f | 49 74 65 78 74 28 70 61 |")..>.._|Itext(pa|
|00001ef0| 73 73 77 25 2c 34 2c 22 | 22 29 0d 0d 48 18 f2 5f |ssw%,4,"|")..H.._|
|00001f00| 49 74 65 78 74 28 70 61 | 73 73 77 25 2c 35 2c 22 |Itext(pa|ssw%,5,"|
|00001f10| 22 29 0d 0d 52 18 e7 20 | 73 69 67 6e 61 74 75 72 |")..R.. |signatur|
|00001f20| 65 5f 6b 6e 6f 77 6e 25 | 20 8c 0d 0d 5c 21 20 f2 |e_known%| ...\! .|
|00001f30| 5f 49 74 65 78 74 28 70 | 61 73 73 77 25 2c 31 2c |_Itext(p|assw%,1,|
|00001f40| a4 54 28 22 43 50 57 3a | 22 29 29 0d 0d 66 20 20 |.T("CPW:|"))..f |
|00001f50| f2 5f 49 74 65 78 74 28 | 70 61 73 73 77 25 2c 32 |._Itext(|passw%,2|
|00001f60| 30 2c 22 43 68 61 6e 67 | 65 22 29 0d 0d 70 06 20 |0,"Chang|e")..p. |
|00001f70| cc 0d 0d 7a 21 20 f2 5f | 49 74 65 78 74 28 70 61 |...z! ._|Itext(pa|
|00001f80| 73 73 77 25 2c 31 2c a4 | 54 28 22 45 50 57 3a 22 |ssw%,1,.|T("EPW:"|
|00001f90| 29 29 0d 0d 84 1d 20 f2 | 5f 49 74 65 78 74 28 70 |)).... .|_Itext(p|
|00001fa0| 61 73 73 77 25 2c 32 30 | 2c 22 4f 6b e9 22 29 0d |assw%,20|,"Ok.").|
|00001fb0| 0d 8e 06 20 cd 0d 0d 98 | 1d f2 5f 49 74 65 78 74 |... ....|.._Itext|
|00001fc0| 28 70 61 73 73 77 25 2c | 31 33 2c 22 6e 6f 6e 65 |(passw%,|13,"none|
|00001fd0| 22 29 0d 0d a2 1e f2 5f | 49 74 65 78 74 28 70 61 |")....._|Itext(pa|
|00001fe0| 73 73 77 25 2c 32 31 2c | 22 63 6f 75 6e 74 22 29 |ssw%,21,|"count")|
|00001ff0| 0d 0d ac 1d f2 5f 49 74 | 65 78 74 28 70 61 73 73 |....._It|ext(pass|
|00002000| 77 25 2c 31 32 2c 22 6e | 6f 6e 65 22 29 0d 0d b6 |w%,12,"n|one")...|
|00002010| 1c f2 5f 49 74 65 78 74 | 28 70 61 73 73 77 25 2c |.._Itext|(passw%,|
|00002020| 31 31 2c 22 30 2e 30 22 | 29 0d 0d c0 05 e1 0d 0d |11,"0.0"|).......|
|00002030| ca 04 0d 0d d4 12 dd 20 | f2 5f 63 68 61 6e 67 65 |....... |._change|
|00002040| 28 61 25 29 0d 0d de 17 | e7 20 70 6f 73 25 3d 30 |(a%)....|. pos%=0|
|00002050| 20 80 20 61 25 3c 30 20 | 20 20 e1 0d 0d e8 17 e7 | . a%<0 | ......|
|00002060| 20 70 6f 73 25 3d 39 39 | 39 20 80 20 61 25 3e 30 | pos%=99|9 . a%>0|
|00002070| 20 e1 0d 0d f2 0c 70 6f | 73 25 2b 3d 61 25 0d 0d | .....po|s%+=a%..|
|00002080| fc 13 e7 20 70 6f 73 25 | 3c 30 20 70 6f 73 25 3d |... pos%|<0 pos%=|
|00002090| 30 0d 0e 06 17 e7 20 70 | 6f 73 25 3e 39 39 39 20 |0..... p|os%>999 |
|000020a0| 70 6f 73 25 3d 39 39 39 | 0d 0e 10 32 f2 5f 75 70 |pos%=999|...2._up|
|000020b0| 64 61 74 65 5f 6c 69 73 | 74 28 70 61 73 73 77 25 |date_lis|t(passw%|
|000020c0| 2c 31 36 2c 74 6f 6b 65 | 6e 24 28 29 2c 70 6f 73 |,16,toke|n$(),pos|
|000020d0| 25 2c 39 39 39 2c 33 2c | 37 29 0d 0e 1a 05 e1 0d |%,999,3,|7)......|
|000020e0| 0e 24 04 0d 0e 2e 13 dd | 20 f2 5f 70 61 73 73 77 |.$......| ._passw|
|000020f0| 5f 63 6c 69 63 6b 0d 0e | 38 1f e7 20 62 75 74 74 |_click..|8.. butt|
|00002100| 25 3d 34 20 64 69 72 25 | 3d 2b 31 20 8b 20 64 69 |%=4 dir%|=+1 . di|
|00002110| 72 25 3d 2d 31 0d 0e 42 | 17 e7 20 a6 28 2d 31 29 |r%=-1..B|.. .(-1)|
|00002120| 20 64 69 72 25 3d 64 69 | 72 25 2a 35 0d 0e 4c 18 | dir%=di|r%*5..L.|
|00002130| e7 20 a6 28 2d 32 29 20 | 64 69 72 25 3d 64 69 72 |. .(-2) |dir%=dir|
|00002140| 25 2a 31 30 0d 0e 56 0c | c8 8e 20 69 68 25 20 ca |%*10..V.|.. ih% .|
|00002150| 0d 0e 60 19 20 c9 20 31 | 37 3a f2 5f 63 68 61 6e |..`. . 1|7:._chan|
|00002160| 67 65 28 2d 64 69 72 25 | 29 0d 0e 6a 18 20 c9 20 |ge(-dir%|)..j. . |
|00002170| 31 38 3a f2 5f 63 68 61 | 6e 67 65 28 64 69 72 25 |18:._cha|nge(dir%|
|00002180| 29 0d 0e 74 12 20 c9 20 | 31 39 3a f2 5f 69 6e 73 |)..t. . |19:._ins|
|00002190| 65 72 74 0d 0e 7e 11 20 | c9 20 32 31 3a f2 5f 63 |ert..~. |. 21:._c|
|000021a0| 6f 75 6e 74 0d 0e 88 35 | 20 c9 20 32 32 3a f2 5f |ount...5| . 22:._|
|000021b0| 66 69 6c 6c 5f 6f 75 74 | 5f 70 61 73 73 77 3a e7 |fill_out|_passw:.|
|000021c0| 20 62 75 74 74 25 3d 34 | 3a f2 5f 63 6c 6f 73 65 | butt%=4|:._close|
|000021d0| 57 28 70 61 73 73 77 25 | 29 0d 0e 92 0f 20 c9 20 |W(passw%|).... . |
|000021e0| 32 30 3a f2 5f 6f 6b 65 | 0d 0e 9c 06 20 cb 0d 0e |20:._oke|.... ...|
|000021f0| a6 05 e1 0d 0e b0 04 0d | 0e ba 12 dd 20 a4 5f 70 |........|.... ._p|
|00002200| 61 73 73 77 5f 6b 65 79 | 73 0d 0e c4 10 70 72 6f |assw_key|s....pro|
|00002210| 63 65 73 73 65 64 25 3d | b9 0d 0e ce 0c c8 8e 20 |cessed%=|....... |
|00002220| 69 68 25 20 ca 0d 0e d8 | 0f 20 20 c9 20 32 2c 33 |ih% ....|. . 2,3|
|00002230| 2c 34 2c 35 0d 0e e2 0f | 20 20 c8 8e 20 6b 65 79 |,4,5....| .. key|
|00002240| 25 20 ca 0d 0e ec 32 20 | 20 20 c9 20 75 70 25 20 |% ....2 | . up% |
|00002250| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002260| 20 3a e7 20 69 68 25 3d | 32 20 ef 37 20 8b 20 69 | :. ih%=|2 .7 . i|
|00002270| 68 25 2d 3d 31 0d 0e f6 | 32 20 20 20 c9 20 64 6f |h%-=1...|2 . do|
|00002280| 77 6e 25 2c 31 33 20 20 | 20 20 20 20 20 20 20 20 |wn%,13 | |
|00002290| 20 20 20 3a e7 20 69 68 | 25 3d 35 20 ef 37 20 8b | :. ih|%=5 .7 .|
|000022a0| 20 69 68 25 2b 3d 31 0d | 0f 00 2d 20 20 20 c9 20 | ih%+=1.|..- . |
|000022b0| 50 61 67 65 5f 75 70 25 | 2c 43 74 72 6c 5f 75 70 |Page_up%|,Ctrl_up|
|000022c0| 25 20 20 20 20 3a 69 68 | 25 3d 32 3a 69 6e 64 65 |% :ih|%=2:inde|
|000022d0| 78 25 3d 30 0d 0f 0a 2e | 20 20 20 c9 20 50 61 67 |x%=0....| . Pag|
|000022e0| 65 5f 64 6f 77 6e 25 2c | 43 74 72 6c 5f 64 6f 77 |e_down%,|Ctrl_dow|
|000022f0| 6e 25 3a 69 68 25 3d 35 | 3a 69 6e 64 65 78 25 3d |n%:ih%=5|:index%=|
|00002300| 35 30 0d 0f 14 3c 20 20 | 20 c9 20 26 31 38 43 2c |50...< | . &18C,|
|00002310| 26 31 39 43 2c 26 31 41 | 43 20 20 20 20 20 20 20 |&19C,&1A|C |
|00002320| 3a e7 20 69 68 25 3d 32 | 20 ef 37 20 8b 20 69 68 |:. ih%=2| .7 . ih|
|00002330| 25 2d 3d 31 3a 69 6e 64 | 65 78 25 3d 34 35 0d 0f |%-=1:ind|ex%=45..|
|00002340| 1e 3b 20 20 20 c9 20 26 | 31 38 44 2c 26 31 39 44 |.; . &|18D,&19D|
|00002350| 2c 26 31 41 44 20 20 20 | 20 20 20 20 3a e7 20 69 |,&1AD | :. i|
|00002360| 68 25 3d 35 20 ef 37 20 | 8b 20 69 68 25 2b 3d 31 |h%=5 .7 |. ih%+=1|
|00002370| 3a 69 6e 64 65 78 25 3d | 30 0d 0f 28 2e 20 20 20 |:index%=|0..(. |
|00002380| c9 20 32 37 20 20 20 20 | 20 20 20 20 20 20 20 20 |. 27 | |
|00002390| 20 20 20 20 20 20 20 3a | f2 5f 63 6c 6f 73 65 57 | :|._closeW|
|000023a0| 28 77 68 25 29 3a e1 0d | 0f 32 2b 20 20 20 c9 20 |(wh%):..|.2+ . |
|000023b0| 39 2c 26 31 38 41 20 20 | 20 20 20 20 20 20 20 20 |9,&18A | |
|000023c0| 20 20 20 20 20 3a f2 5f | 69 6e 73 65 72 74 5f 61 | :._|insert_a|
|000023d0| 64 64 0d 0f 3c 08 20 20 | 20 7f 0d 0f 46 21 20 20 |dd..<. | ...F! |
|000023e0| 20 20 20 e7 20 28 6b 65 | 79 25 3e 33 31 20 80 20 | . (ke|y%>31 . |
|000023f0| 6b 65 79 25 3c 31 32 38 | 29 20 8c 0d 0f 50 22 20 |key%<128|) ...P" |
|00002400| 20 20 20 20 20 f2 5f 68 | 6f 6c 65 73 28 69 68 25 | ._h|oles(ih%|
|00002410| 2c 69 6e 64 65 78 25 2c | 6b 65 79 25 29 0d 0f 5a |,index%,|key%)..Z|
|00002420| 0b 20 20 20 20 20 20 cc | 0d 0f 64 16 20 20 20 20 |. .|..d. |
|00002430| 20 20 70 72 6f 63 65 73 | 73 65 64 25 3d a3 0d 0f | proces|sed%=...|
|00002440| 6e 0b 20 20 20 20 20 20 | cd 0d 0f 78 08 20 20 20 |n. |...x. |
|00002450| cb 0d 0f 82 13 20 7f 20 | 70 72 6f 63 65 73 73 65 |..... . |processe|
|00002460| 64 25 3d a3 0d 0f 8c 06 | 20 cb 0d 0f 96 12 e7 20 |d%=.....| ...... |
|00002470| 70 72 6f 63 65 73 73 65 | 64 25 20 8c 0d 0f a0 38 |processe|d% ....8|
|00002480| 20 e7 20 a9 a4 5f 49 74 | 65 78 74 28 77 68 25 2c | . .._It|ext(wh%,|
|00002490| 69 68 25 29 3c 69 6e 64 | 65 78 25 20 69 6e 64 65 |ih%)<ind|ex% inde|
|000024a0| 78 25 3d a9 a4 5f 49 74 | 65 78 74 28 77 68 25 2c |x%=.._It|ext(wh%,|
|000024b0| 69 68 25 29 0d 0f aa 32 | 20 c8 99 22 57 69 6d 70 |ih%)...2| .."Wimp|
|000024c0| 5f 53 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_SetCare|tPositio|
|000024d0| 6e 22 2c 77 68 25 2c 69 | 68 25 2c 2c 2c 2d 31 2c |n",wh%,i|h%,,,-1,|
|000024e0| 69 6e 64 65 78 25 0d 0f | b4 06 20 cd 0d 0f be 10 |index%..|.. .....|
|000024f0| 3a 3d 70 72 6f 63 65 73 | 73 65 64 25 0d 0f c8 04 |:=proces|sed%....|
|00002500| 0d 0f d2 22 dd 20 f2 5f | 68 6f 6c 65 73 28 f8 20 |...". ._|holes(. |
|00002510| 69 68 25 2c f8 20 69 6e | 64 65 78 25 2c 6b 65 79 |ih%,. in|dex%,key|
|00002520| 25 29 0d 0f dc 17 ea 20 | 41 24 2c 49 25 2c 42 24 |%)..... |A$,I%,B$|
|00002530| 2c 4a 25 2c 69 25 2c 57 | 24 0d 0f e6 0d 69 25 3d |,J%,i%,W|$....i%=|
|00002540| 69 6e 64 65 78 25 0d 0f | f0 0e e3 20 49 25 3d 32 |index%..|... I%=2|
|00002550| 20 b8 20 35 0d 0f fa 1b | 20 e7 20 49 25 3d 69 68 | . 5....| . I%=ih|
|00002560| 25 20 8c 20 69 6e 64 65 | 78 25 2b 3d a9 41 24 0d |% . inde|x%+=.A$.|
|00002570| 10 04 18 20 41 24 2b 3d | a4 5f 49 74 65 78 74 28 |... A$+=|._Itext(|
|00002580| 77 68 25 2c 49 25 29 0d | 10 0e 06 20 ed 0d 10 18 |wh%,I%).|... ....|
|00002590| 30 41 24 3d c0 41 24 2c | 69 6e 64 65 78 25 29 2b |0A$=.A$,|index%)+|
|000025a0| bd 6b 65 79 25 2b c1 41 | 24 2c 69 6e 64 65 78 25 |.key%+.A|$,index%|
|000025b0| 2b 31 29 3a 69 6e 64 65 | 78 25 2b 3d 31 0d 10 22 |+1):inde|x%+=1.."|
|000025c0| 08 49 25 3d 30 0d 10 2c | 05 f5 0d 10 36 1b 20 57 |.I%=0..,|....6. W|
|000025d0| 24 3d c1 41 24 2c 69 6e | 64 65 78 25 2d 49 25 2c |$=.A$,in|dex%-I%,|
|000025e0| 31 29 2b 57 24 0d 10 40 | 0a 20 49 25 2b 3d 31 0d |1)+W$..@|. I%+=1.|
|000025f0| 10 4a 1f 20 fd 20 c0 57 | 24 2c 31 29 3d 22 20 22 |.J. . .W|$,1)=" "|
|00002600| 20 84 20 69 6e 64 65 78 | 25 2d 49 25 3d 30 0d 10 | . index|%-I%=0..|
|00002610| 54 08 49 25 3d 31 0d 10 | 5e 05 f5 0d 10 68 1b 20 |T.I%=1..|^....h. |
|00002620| 57 24 3d 57 24 2b c1 41 | 24 2c 69 6e 64 65 78 25 |W$=W$+.A|$,index%|
|00002630| 2b 49 25 2c 31 29 0d 10 | 72 0a 20 49 25 2b 3d 31 |+I%,1)..|r. I%+=1|
|00002640| 0d 10 7c 21 20 fd 20 c2 | 57 24 2c 31 29 3d 22 20 |..|! . .|W$,1)=" |
|00002650| 22 20 84 20 69 6e 64 65 | 78 25 2b 49 25 3e a9 41 |" . inde|x%+I%>.A|
|00002660| 24 0d 10 86 1a e7 20 c0 | 57 24 2c 31 29 3d 22 20 |$..... .|W$,1)=" |
|00002670| 22 20 57 24 3d c1 57 24 | 2c 32 29 0d 10 90 1e e7 |" W$=.W$|,2).....|
|00002680| 20 c2 57 24 2c 31 29 3d | 22 20 22 20 57 24 3d c0 | .W$,1)=|" " W$=.|
|00002690| 57 24 2c a9 57 24 2d 31 | 29 0d 10 9a 1a 70 6f 73 |W$,.W$-1|)....pos|
|000026a0| 25 3d 94 a4 5f 62 69 6e | 5f 73 65 61 72 63 68 28 |%=.._bin|_search(|
|000026b0| 57 24 29 0d 10 a4 0f f2 | 5f 63 68 61 6e 67 65 28 |W$).....|_change(|
|000026c0| 30 29 0d 10 ae 04 0d 10 | b8 1c 4a 25 3d 30 3a 69 |0)......|..J%=0:i|
|000026d0| 25 3d 69 6e 64 65 78 25 | 3a 69 6e 64 65 78 25 3d |%=index%|:index%=|
|000026e0| 2d 31 0d 10 c2 0e e3 20 | 49 25 3d 32 20 b8 20 35 |-1..... |I%=2 . 5|
|000026f0| 0d 10 cc 1a 20 42 24 3d | c0 41 24 2c 34 35 29 3a |.... B$=|.A$,45):|
|00002700| 41 24 3d c1 41 24 2c 34 | 36 29 0d 10 d6 0c 20 e7 |A$=.A$,4|6).... .|
|00002710| 20 a9 41 24 20 8c 0d 10 | e0 1d 20 20 c8 95 20 c2 | .A$ ...|.. .. .|
|00002720| 42 24 2c 31 29 3c 3e 22 | 20 22 20 80 20 42 24 3c |B$,1)<>"| " . B$<|
|00002730| 3e 22 22 0d 10 ea 13 20 | 20 20 41 24 3d c2 42 24 |>"".... | A$=.B$|
|00002740| 2c 31 29 2b 41 24 0d 10 | f4 14 20 20 20 42 24 3d |,1)+A$..|.. B$=|
|00002750| c0 42 24 2c a9 42 24 2d | 31 29 0d 10 fe 08 20 20 |.B$,.B$-|1).... |
|00002760| 20 ce 0d 11 08 25 20 20 | e7 20 42 24 3d 22 22 20 | ....% |. B$="" |
|00002770| 8c 20 42 24 3d c0 41 24 | 2c 34 35 29 3a 41 24 3d |. B$=.A$|,45):A$=|
|00002780| c1 41 24 2c 34 35 29 0d | 11 12 07 20 20 cd 0d 11 |.A$,45).|... ...|
|00002790| 1c 32 20 e7 20 4a 25 3c | 3d 69 25 20 80 20 69 25 |.2 . J%<|=i% . i%|
|000027a0| 3c 4a 25 2b a9 42 24 20 | 20 20 20 8c 20 69 68 25 |<J%+.B$ | . ih%|
|000027b0| 3d 49 25 3a 69 6e 64 65 | 78 25 3d 69 25 2d 4a 25 |=I%:inde|x%=i%-J%|
|000027c0| 0d 11 26 32 20 e7 20 69 | 25 3d 4a 25 2b a9 42 24 |..&2 . i|%=J%+.B$|
|000027d0| 20 80 20 69 6e 64 65 78 | 25 3d 2d 31 20 8c 20 69 | . index|%=-1 . i|
|000027e0| 68 25 3d 49 25 3a 69 6e | 64 65 78 25 3d 69 25 2d |h%=I%:in|dex%=i%-|
|000027f0| 4a 25 0d 11 30 2e 20 e7 | 20 a4 5f 49 74 65 78 74 |J%..0. .| ._Itext|
|00002800| 28 77 68 25 2c 49 25 29 | 3c 3e 20 42 24 20 f2 5f |(wh%,I%)|<> B$ ._|
|00002810| 49 74 65 78 74 28 77 68 | 25 2c 49 25 2c 42 24 29 |Itext(wh|%,I%,B$)|
|00002820| 0d 11 3a 0c 20 4a 25 2b | 3d a9 42 24 0d 11 44 06 |..:. J%+|=.B$..D.|
|00002830| 20 ed 0d 11 4e 05 e1 0d | 11 58 04 0d 11 62 1f dd | ...N...|.X...b..|
|00002840| 20 f2 5f 4b 69 6e 73 65 | 72 74 28 41 24 2c 69 6e | ._Kinse|rt(A$,in|
|00002850| 64 65 78 25 2c 6b 65 79 | 25 29 0d 11 6c 37 f2 5f |dex%,key|%)..l7._|
|00002860| 49 74 65 78 74 28 70 61 | 73 73 77 25 2c 69 68 25 |Itext(pa|ssw%,ih%|
|00002870| 2c c0 41 24 2c 69 6e 64 | 65 78 25 29 2b bd 6b 65 |,.A$,ind|ex%)+.ke|
|00002880| 79 25 2b c1 41 24 2c 69 | 6e 64 65 78 25 2b 31 29 |y%+.A$,i|ndex%+1)|
|00002890| 29 0d 11 76 0d 69 6e 64 | 65 78 25 2b 3d 31 0d 11 |)..v.ind|ex%+=1..|
|000028a0| 80 38 c8 99 22 57 69 6d | 70 5f 53 65 74 43 61 72 |.8.."Wim|p_SetCar|
|000028b0| 65 74 50 6f 73 69 74 69 | 6f 6e 22 2c 70 61 73 73 |etPositi|on",pass|
|000028c0| 77 25 2c 69 68 25 2c 2d | 31 2c 2d 31 2c 2d 31 2c |w%,ih%,-|1,-1,-1,|
|000028d0| 69 6e 64 65 78 25 0d 11 | 8a 05 e1 0d 11 94 04 0d |index%..|........|
|000028e0| 11 9e 0e dd 20 f2 5f 69 | 6e 73 65 72 74 0d 11 a8 |.... ._i|nsert...|
|000028f0| 25 c8 99 22 57 69 6d 70 | 5f 47 65 74 43 61 72 65 |%.."Wimp|_GetCare|
|00002900| 74 50 6f 73 69 74 69 6f | 6e 22 2c 2c 62 6c 6f 63 |tPositio|n",,bloc|
|00002910| 6b 25 0d 11 b2 18 e7 20 | 62 6c 6f 63 6b 25 21 30 |k%..... |block%!0|
|00002920| 3c 3e 70 61 73 73 77 25 | 20 e1 0d 11 bc 1f e7 20 |<>passw%| ...... |
|00002930| 62 6c 6f 63 6b 25 21 34 | 3c 32 20 84 20 62 6c 6f |block%!4|<2 . blo|
|00002940| 63 6b 25 21 34 3e 35 20 | e1 0d 11 c6 14 69 6e 64 |ck%!4>5 |.....ind|
|00002950| 65 78 25 3d 62 6c 6f 63 | 6b 25 21 32 30 0d 11 d0 |ex%=bloc|k%!20...|
|00002960| 10 69 68 25 3d 62 6c 6f | 63 6b 25 21 34 0d 11 da |.ih%=blo|ck%!4...|
|00002970| 1a 41 24 3d a4 5f 49 74 | 65 78 74 28 70 61 73 73 |.A$=._It|ext(pass|
|00002980| 77 25 2c 69 68 25 29 0d | 11 e4 3e f2 5f 49 74 65 |w%,ih%).|..>._Ite|
|00002990| 78 74 28 70 61 73 73 77 | 25 2c 69 68 25 2c c0 41 |xt(passw|%,ih%,.A|
|000029a0| 24 2c 69 6e 64 65 78 25 | 29 2b 74 6f 6b 65 6e 24 |$,index%|)+token$|
|000029b0| 28 70 6f 73 25 29 2b c1 | 41 24 2c 69 6e 64 65 78 |(pos%)+.|A$,index|
|000029c0| 25 2b 31 29 29 0d 11 ee | 19 69 6e 64 65 78 25 2b |%+1))...|.index%+|
|000029d0| 3d a9 74 6f 6b 65 6e 24 | 28 70 6f 73 25 29 0d 11 |=.token$|(pos%)..|
|000029e0| f8 38 c8 99 22 57 69 6d | 70 5f 53 65 74 43 61 72 |.8.."Wim|p_SetCar|
|000029f0| 65 74 50 6f 73 69 74 69 | 6f 6e 22 2c 70 61 73 73 |etPositi|on",pass|
|00002a00| 77 25 2c 69 68 25 2c 2d | 31 2c 2d 31 2c 2d 31 2c |w%,ih%,-|1,-1,-1,|
|00002a10| 69 6e 64 65 78 25 0d 12 | 02 05 e1 0d 12 0c 04 0d |index%..|........|
|00002a20| 12 16 12 dd 20 f2 5f 69 | 6e 73 65 72 74 5f 61 64 |.... ._i|nsert_ad|
|00002a30| 64 0d 12 20 11 ea 20 57 | 24 2c 49 25 2c 41 24 2c |d.. .. W|$,I%,A$,|
|00002a40| 42 24 0d 12 2a 1a 41 24 | 3d a4 5f 49 74 65 78 74 |B$..*.A$|=._Itext|
|00002a50| 28 70 61 73 73 77 25 2c | 69 68 25 29 0d 12 34 08 |(passw%,|ih%)..4.|
|00002a60| 49 25 3d 30 0d 12 3e 05 | f5 0d 12 48 1b 20 57 24 |I%=0..>.|...H. W$|
|00002a70| 3d c1 41 24 2c 69 6e 64 | 65 78 25 2d 49 25 2c 31 |=.A$,ind|ex%-I%,1|
|00002a80| 29 2b 57 24 0d 12 52 0a | 20 49 25 2b 3d 31 0d 12 |)+W$..R.| I%+=1..|
|00002a90| 5c 1f 20 fd 20 c0 57 24 | 2c 31 29 3d 22 20 22 20 |\. . .W$|,1)=" " |
|00002aa0| 84 20 69 6e 64 65 78 25 | 2d 49 25 3d 30 0d 12 66 |. index%|-I%=0..f|
|00002ab0| 08 49 25 3d 31 0d 12 70 | 05 f5 0d 12 7a 1b 20 57 |.I%=1..p|....z. W|
|00002ac0| 24 3d 57 24 2b c1 41 24 | 2c 69 6e 64 65 78 25 2b |$=W$+.A$|,index%+|
|00002ad0| 49 25 2c 31 29 0d 12 84 | 0a 20 49 25 2b 3d 31 0d |I%,1)...|. I%+=1.|
|00002ae0| 12 8e 21 20 fd 20 c2 57 | 24 2c 31 29 3d 22 20 22 |..! . .W|$,1)=" "|
|00002af0| 20 84 20 69 6e 64 65 78 | 25 2b 49 25 3e a9 41 24 | . index|%+I%>.A$|
|00002b00| 0d 12 98 1a e7 20 c0 57 | 24 2c 31 29 3d 22 20 22 |..... .W|$,1)=" "|
|00002b10| 20 57 24 3d c1 57 24 2c | 32 29 0d 12 a2 1e e7 20 | W$=.W$,|2)..... |
|00002b20| c2 57 24 2c 31 29 3d 22 | 20 22 20 57 24 3d c0 57 |.W$,1)="| " W$=.W|
|00002b30| 24 2c a9 57 24 2d 31 29 | 0d 12 ac 17 42 24 3d 74 |$,.W$-1)|....B$=t|
|00002b40| 6f 6b 65 6e 24 28 70 6f | 73 25 29 2b 22 20 22 0d |oken$(po|s%)+" ".|
|00002b50| 12 b6 38 f2 5f 49 74 65 | 78 74 28 70 61 73 73 77 |..8._Ite|xt(passw|
|00002b60| 25 2c 69 68 25 2c c0 41 | 24 2c 69 6e 64 65 78 25 |%,ih%,.A|$,index%|
|00002b70| 2d a9 57 24 29 2b 42 24 | 2b c1 41 24 2c 69 6e 64 |-.W$)+B$|+.A$,ind|
|00002b80| 65 78 25 2b 31 29 29 0d | 12 c0 15 69 6e 64 65 78 |ex%+1)).|...index|
|00002b90| 25 3d 69 6e 64 65 78 25 | 2b a9 42 24 0d 12 ca 34 |%=index%|+.B$...4|
|00002ba0| c8 99 22 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 |.."Wimp_|SetCaret|
|00002bb0| 50 6f 73 69 74 69 6f 6e | 22 2c 70 61 73 73 77 25 |Position|",passw%|
|00002bc0| 2c 69 68 25 2c 2c 2c 2d | 31 2c 69 6e 64 65 78 25 |,ih%,,,-|1,index%|
|00002bd0| 0d 12 d4 05 e1 0d 12 de | 04 0d 12 e8 16 dd 20 a4 |........|...... .|
|00002be0| 5f 62 69 6e 5f 73 65 61 | 72 63 68 28 61 24 29 0d |_bin_sea|rch(a$).|
|00002bf0| 12 f2 0e ea 20 69 25 2c | 6a 25 2c 6d 25 0d 12 fc |.... i%,|j%,m%...|
|00002c00| 17 61 24 3d a4 5f 6c 6f | 77 65 72 5f 63 61 73 65 |.a$=._lo|wer_case|
|00002c10| 28 61 24 29 0d 13 06 0f | 69 25 3d 30 3a 6a 25 3d |(a$)....|i%=0:j%=|
|00002c20| 39 39 39 0d 13 10 10 6d | 25 3d 28 69 25 2b 6a 25 |999....m|%=(i%+j%|
|00002c30| 29 81 32 0d 13 1a 05 f5 | 0d 13 24 11 20 6d 25 3d |).2.....|..$. m%=|
|00002c40| 28 69 25 2b 6a 25 29 81 | 32 0d 13 2e 24 20 e7 20 |(i%+j%).|2...$ . |
|00002c50| 61 24 3e 74 6f 6b 65 6e | 24 28 6d 25 29 20 8c 20 |a$>token|$(m%) . |
|00002c60| 69 25 3d 6d 25 20 8b 20 | 6a 25 3d 6d 25 0d 13 38 |i%=m% . |j%=m%..8|
|00002c70| 1e 20 fd 20 61 24 3d 74 | 6f 6b 65 6e 24 28 6d 25 |. . a$=t|oken$(m%|
|00002c80| 29 20 84 20 69 25 3d 6a | 25 2d 31 0d 13 42 1a e7 |) . i%=j|%-1..B..|
|00002c90| 20 61 24 3d 74 6f 6b 65 | 6e 24 28 69 25 29 20 8c | a$=toke|n$(i%) .|
|00002ca0| 20 3a 3d 69 25 0d 13 4c | 1a e7 20 61 24 3d 74 6f | :=i%..L|.. a$=to|
|00002cb0| 6b 65 6e 24 28 6a 25 29 | 20 8c 20 3a 3d 6a 25 0d |ken$(j%)| . :=j%.|
|00002cc0| 13 56 1a e7 20 61 24 3d | 74 6f 6b 65 6e 24 28 6d |.V.. a$=|token$(m|
|00002cd0| 25 29 20 8c 20 3a 3d 6d | 25 0d 13 60 09 3a 3d 2d |%) . :=m|%..`.:=-|
|00002ce0| 6a 25 0d 13 6a 04 0d 13 | 74 0d dd 20 f2 5f 63 6f |j%..j...|t.. ._co|
|00002cf0| 75 6e 74 0d 13 7e 19 ea | 20 76 61 6c 69 64 25 2c |unt..~..| valid%,|
|00002d00| 77 6f 72 64 73 25 2c 61 | 24 2c 62 24 0d 13 88 10 |words%,a|$,b$....|
|00002d10| 70 61 73 73 77 6f 72 64 | 24 3d 22 22 0d 13 92 1d |password|$=""....|
|00002d20| 61 24 3d a4 5f 49 74 65 | 78 74 28 70 61 73 73 77 |a$=._Ite|xt(passw|
|00002d30| 25 2c 32 29 20 2b 22 20 | 22 0d 13 9c 1d 61 24 2b |%,2) +" |"....a$+|
|00002d40| 3d a4 5f 49 74 65 78 74 | 28 70 61 73 73 77 25 2c |=._Itext|(passw%,|
|00002d50| 33 29 2b 22 20 22 0d 13 | a6 1d 61 24 2b 3d a4 5f |3)+" "..|..a$+=._|
|00002d60| 49 74 65 78 74 28 70 61 | 73 73 77 25 2c 34 29 2b |Itext(pa|ssw%,4)+|
|00002d70| 22 20 22 0d 13 b0 1d 61 | 24 2b 3d a4 5f 49 74 65 |" "....a|$+=._Ite|
|00002d80| 78 74 28 70 61 73 73 77 | 25 2c 35 29 2b 22 20 22 |xt(passw|%,5)+" "|
|00002d90| 0d 13 ba 12 c8 95 20 a7 | 61 24 2c 22 20 20 22 29 |...... .|a$," ")|
|00002da0| 3e 30 0d 13 c4 27 20 61 | 24 3d c0 61 24 2c a7 61 |>0...' a|$=.a$,.a|
|00002db0| 24 2c 22 20 20 22 29 29 | 2b c1 61 24 2c a7 61 24 |$," "))|+.a$,.a$|
|00002dc0| 2c 22 20 20 22 29 2b 32 | 29 0d 13 ce 06 20 ce 0d |," ")+2|).... ..|
|00002dd0| 13 d8 1d c8 95 20 c0 61 | 24 2c 31 29 3d 22 20 22 |..... .a|$,1)=" "|
|00002de0| 3a 61 24 3d c1 61 24 2c | 32 29 3a ce 0d 13 e2 21 |:a$=.a$,|2):....!|
|00002df0| c8 95 20 c2 61 24 2c 31 | 29 3d 22 20 22 3a 61 24 |.. .a$,1|)=" ":a$|
|00002e00| 3d c0 61 24 2c a9 61 24 | 2d 31 29 3a ce 0d 13 ec |=.a$,.a$|-1):....|
|00002e10| 09 62 24 3d 61 24 0d 13 | f6 05 f5 0d 14 00 0d 20 |.b$=a$..|....... |
|00002e20| 77 6f 72 64 24 3d 22 22 | 0d 14 0a 1f 20 c8 95 20 |word$=""|.... .. |
|00002e30| 61 24 3c 3e 22 22 20 80 | 20 c2 77 6f 72 64 24 2c |a$<>"" .| .word$,|
|00002e40| 31 29 3c 3e 22 20 22 0d | 14 14 13 20 20 77 6f 72 |1)<>" ".|... wor|
|00002e50| 64 24 2b 3d c0 61 24 2c | 31 29 0d 14 1e 0f 20 20 |d$+=.a$,|1).... |
|00002e60| 61 24 3d c1 61 24 2c 32 | 29 0d 14 28 07 20 20 ce |a$=.a$,2|)..(. .|
|00002e70| 0d 14 32 2c 20 e7 20 20 | c2 77 6f 72 64 24 2c 31 |..2, . |.word$,1|
|00002e80| 29 3d 22 20 22 20 77 6f | 72 64 24 3d c0 77 6f 72 |)=" " wo|rd$=.wor|
|00002e90| 64 24 2c a9 77 6f 72 64 | 24 2d 31 29 0d 14 3c 12 |d$,.word|$-1)..<.|
|00002ea0| 20 e7 20 77 6f 72 64 24 | 3c 3e 22 22 20 8c 0d 14 | . word$|<>"" ...|
|00002eb0| 46 1d 20 20 20 61 25 3d | a4 5f 62 69 6e 5f 73 65 |F. a%=|._bin_se|
|00002ec0| 61 72 63 68 28 77 6f 72 | 64 24 29 0d 14 50 32 20 |arch(wor|d$)..P2 |
|00002ed0| 20 20 e7 20 61 25 3e 2d | 31 20 8c 20 76 61 6c 69 | . a%>-|1 . vali|
|00002ee0| 64 25 2b 3d 31 3a 70 61 | 73 73 77 6f 72 64 24 2b |d%+=1:pa|ssword$+|
|00002ef0| 3d c2 22 30 30 22 2b c3 | 61 25 2c 34 29 0d 14 5a |=."00"+.|a%,4)..Z|
|00002f00| 16 20 20 20 77 6f 72 64 | 73 25 3d 77 6f 72 64 73 |. word|s%=words|
|00002f10| 25 2b 31 0d 14 64 08 20 | 20 20 cd 0d 14 6e 0c 20 |%+1..d. | ...n. |
|00002f20| fd 20 61 24 3d 22 22 0d | 14 78 29 f2 5f 49 74 65 |. a$="".|.x)._Ite|
|00002f30| 78 74 28 70 61 73 73 77 | 25 2c 31 33 2c c3 76 61 |xt(passw|%,13,.va|
|00002f40| 6c 69 64 25 29 20 20 20 | 3a f4 20 76 61 6c 69 64 |lid%) |:. valid|
|00002f50| 0d 14 82 29 f2 5f 49 74 | 65 78 74 28 70 61 73 73 |...)._It|ext(pass|
|00002f60| 77 25 2c 31 32 2c c3 77 | 6f 72 64 73 25 29 20 20 |w%,12,.w|ords%) |
|00002f70| 20 3a f4 20 77 6f 72 64 | 73 0d 14 8c 3e f2 5f 49 | :. word|s...>._I|
|00002f80| 74 65 78 74 28 70 61 73 | 73 77 25 2c 31 31 2c c3 |text(pas|sw%,11,.|
|00002f90| 28 a8 28 20 31 30 30 2a | 76 61 6c 69 64 25 2a 33 |(.( 100*|valid%*3|
|00002fa0| 2f 73 65 63 72 65 74 5f | 6c 65 6e 25 29 20 29 29 |/secret_|len%) ))|
|00002fb0| 3a f4 20 70 65 72 63 0d | 14 96 05 e1 0d 14 a0 04 |:. perc.|........|
|00002fc0| 0d 14 aa 0b dd 20 f2 5f | 6f 6b 65 0d 14 b4 0b f2 |..... ._|oke.....|
|00002fd0| 5f 63 6f 75 6e 74 0d 14 | be 2b e7 20 70 61 73 73 |_count..|.+. pass|
|00002fe0| 77 6f 72 64 24 3d 22 22 | 20 8c 20 f2 5f 49 6e 66 |word$=""| . ._Inf|
|00002ff0| 6f 72 6d 28 a4 54 28 22 | 59 4e 50 3a 22 29 29 3a |orm(.T("|YNP:")):|
|00003000| e1 0d 14 c8 0f f2 5f 65 | 73 63 61 70 65 5f 6f 6e |......_e|scape_on|
|00003010| 0d 14 d2 40 e7 20 73 65 | 63 72 65 74 5f 6c 65 6e |...@. se|cret_len|
|00003020| 25 3c a9 70 61 73 73 77 | 6f 72 64 24 20 8c 20 70 |%<.passw|ord$ . p|
|00003030| 61 73 73 77 6f 72 64 24 | 3d c2 70 61 73 73 77 6f |assword$|=.passwo|
|00003040| 72 64 24 2c 73 65 63 72 | 65 74 5f 6c 65 6e 25 29 |rd$,secr|et_len%)|
|00003050| 0d 14 dc 1e c8 95 20 20 | 73 65 63 72 65 74 5f 6c |...... |secret_l|
|00003060| 65 6e 25 3e a9 70 61 73 | 73 77 6f 72 64 24 0d 14 |en%>.pas|sword$..|
|00003070| e6 13 20 70 61 73 73 77 | 6f 72 64 24 2b 3d 22 30 |.. passw|ord$+="0|
|00003080| 22 0d 14 f0 06 20 ce 0d | 14 fa 28 f2 5f 72 65 61 |".... ..|..(._rea|
|00003090| 64 5f 62 69 67 28 74 65 | 6d 70 25 20 20 20 20 20 |d_big(te|mp% |
|000030a0| 20 20 2c 20 70 61 73 73 | 77 6f 72 64 24 20 29 0d | , pass|word$ ).|
|000030b0| 15 04 28 f2 5f 72 65 61 | 64 5f 62 69 67 28 70 75 |..(._rea|d_big(pu|
|000030c0| 62 6c 69 63 5f 6b 65 79 | 31 25 2c 20 6d 79 5f 6b |blic_key|1%, my_k|
|000030d0| 65 79 31 24 20 20 29 0d | 15 0e 28 f2 5f 72 65 61 |ey1$ ).|..(._rea|
|000030e0| 64 5f 62 69 67 28 70 75 | 62 6c 69 63 5f 6b 65 79 |d_big(pu|blic_key|
|000030f0| 32 25 2c 20 6d 79 5f 6b | 65 79 32 24 20 20 29 0d |2%, my_k|ey2$ ).|
|00003100| 15 18 18 e7 20 73 69 67 | 6e 61 74 75 72 65 5f 6b |.... sig|nature_k|
|00003110| 6e 6f 77 6e 25 20 8c 0d | 15 22 1c 20 51 25 3d ae |nown% ..|.". Q%=.|
|00003120| 28 6d 79 64 69 72 24 2b | 22 2e 70 72 69 76 61 74 |(mydir$+|".privat|
|00003130| 65 22 29 0d 15 2c 38 20 | d5 23 51 25 2c 22 25 25 |e")..,8 |.#Q%,"%%|
|00003140| 20 54 68 69 73 20 70 61 | 73 73 77 6f 72 64 20 63 | This pa|ssword c|
|00003150| 6f 6e 74 61 69 6e 73 20 | 68 61 6c 66 20 6f 66 20 |ontains |half of |
|00003160| 79 6f 75 72 20 6b 65 79 | 2e 2e 22 0d 15 36 3f 20 |your key|.."..6? |
|00003170| d5 23 51 25 2c 22 25 25 | 20 54 68 65 20 6f 74 68 |.#Q%,"%%| The oth|
|00003180| 65 72 20 68 61 6c 66 20 | 63 6f 6d 65 73 20 66 72 |er half |comes fr|
|00003190| 6f 6d 20 79 6f 75 72 20 | 70 61 73 73 77 6f 72 64 |om your |password|
|000031a0| 20 73 65 6e 74 65 6e 63 | 65 22 0d 15 40 1f 20 d5 | sentenc|e"..@. .|
|000031b0| 23 51 25 2c 22 25 25 20 | 67 65 6e 65 72 61 74 65 |#Q%,"%% |generate|
|000031c0| 64 20 6f 6e 20 22 2b 91 | 24 0d 15 4a 15 20 d5 23 |d on "+.|$..J. .#|
|000031d0| 51 25 2c 22 49 3d 22 2b | 6f 77 6e 65 72 24 0d 15 |Q%,"I="+|owner$..|
|000031e0| 54 2f 20 c8 99 20 22 4e | 75 6d 5f 53 75 62 22 2c |T/ .. "N|um_Sub",|
|000031f0| 73 65 63 72 65 74 5f 6b | 65 79 25 2c 74 65 6d 70 |secret_k|ey%,temp|
|00003200| 25 2c 73 65 63 72 65 74 | 5f 6b 65 79 25 0d 15 5e |%,secret|_key%..^|
|00003210| 21 20 73 65 63 72 65 74 | 24 3d a4 73 74 72 69 6e |! secret|$=.strin|
|00003220| 67 28 73 65 63 72 65 74 | 5f 6b 65 79 25 29 0d 15 |g(secret|_key%)..|
|00003230| 68 2f 20 c8 99 20 20 4e | 75 6d 5f 41 64 64 25 2c |h/ .. N|um_Add%,|
|00003240| 73 65 63 72 65 74 5f 6b | 65 79 25 2c 74 65 6d 70 |secret_k|ey%,temp|
|00003250| 25 2c 73 65 63 72 65 74 | 5f 6b 65 79 25 0d 15 72 |%,secret|_key%..r|
|00003260| 16 20 d5 23 51 25 2c 22 | 44 3d 22 2b 73 65 63 72 |. .#Q%,"|D="+secr|
|00003270| 65 74 24 0d 15 7c 17 20 | d5 23 51 25 2c 22 4e 3d |et$..|. |.#Q%,"N=|
|00003280| 22 2b 6d 79 5f 6b 65 79 | 31 24 0d 15 86 17 20 d5 |"+my_key|1$.... .|
|00003290| 23 51 25 2c 22 45 3d 22 | 2b 6d 79 5f 6b 65 79 32 |#Q%,"E="|+my_key2|
|000032a0| 24 0d 15 90 09 20 d9 23 | 51 25 0d 15 9a 2f 20 c8 |$.... .#|Q%.../ .|
|000032b0| 99 22 4f 53 5f 46 69 6c | 65 22 2c 31 37 2c 6d 79 |."OS_Fil|e",17,my|
|000032c0| 64 69 72 24 2b 22 2e 70 | 72 69 76 61 74 65 22 20 |dir$+".p|rivate" |
|000032d0| b8 20 2c 2c 41 25 2c 42 | 25 0d 15 a4 15 20 e7 20 |. ,,A%,B|%.... . |
|000032e0| 41 25 3e 26 46 46 46 30 | 30 30 30 30 20 8c 0d 15 |A%>&FFF0|0000 ...|
|000032f0| ae 36 20 20 20 21 62 6c | 6f 63 6b 25 3d 42 25 3a |.6 !bl|ock%=B%:|
|00003300| 62 6c 6f 63 6b 25 21 34 | 3d 41 25 3a 70 72 69 76 |block%!4|=A%:priv|
|00003310| 5f 74 69 6d 65 3d a4 5f | 73 65 63 73 28 62 6c 6f |_time=._|secs(blo|
|00003320| 63 6b 25 29 0d 15 b8 08 | 20 20 20 cc 0d 15 c2 22 |ck%)....| ...."|
|00003330| 20 20 20 ff 22 53 54 41 | 4d 50 20 22 2b 6d 79 64 | ."STA|MP "+myd|
|00003340| 69 72 24 2b 22 2e 70 72 | 69 76 61 74 65 22 0d 15 |ir$+".pr|ivate"..|
|00003350| cc 31 20 20 20 c8 99 22 | 4f 53 5f 46 69 6c 65 22 |.1 .."|OS_File"|
|00003360| 2c 31 37 2c 6d 79 64 69 | 72 24 2b 22 2e 70 72 69 |,17,mydi|r$+".pri|
|00003370| 76 61 74 65 22 20 b8 20 | 2c 2c 41 25 2c 42 25 0d |vate" . |,,A%,B%.|
|00003380| 15 d6 17 20 20 20 e7 20 | 41 25 3e 26 46 46 46 30 |... . |A%>&FFF0|
|00003390| 30 30 30 30 20 8c 0d 15 | e0 37 20 20 20 20 21 62 |0000 ...|.7 !b|
|000033a0| 6c 6f 63 6b 25 3d 42 25 | 3a 62 6c 6f 63 6b 25 21 |lock%=B%|:block%!|
|000033b0| 34 3d 41 25 3a 70 72 69 | 76 5f 74 69 6d 65 3d a4 |4=A%:pri|v_time=.|
|000033c0| 5f 73 65 63 73 28 62 6c | 6f 63 6b 25 29 0d 15 ea |_secs(bl|ock%)...|
|000033d0| 09 20 20 20 20 cc 0d 15 | f4 3b 20 20 20 20 70 72 |. ...|.; pr|
|000033e0| 69 76 5f 74 69 6d 65 3d | 30 3a 85 20 32 2c 22 46 |iv_time=|0:. 2,"F|
|000033f0| 61 69 6c 75 72 65 20 69 | 6e 20 74 69 6d 65 20 73 |ailure i|n time s|
|00003400| 74 61 6d 70 69 6e 67 20 | 73 79 73 74 65 6d 20 21 |tamping |system !|
|00003410| 22 0d 15 fe 09 20 20 20 | 20 cd 0d 16 08 08 20 20 |".... | ..... |
|00003420| 20 cd 0d 16 12 14 f2 5f | 73 70 65 6c 6c 5f 6f 75 | ......_|spell_ou|
|00003430| 74 5f 74 69 6d 65 0d 16 | 1c 19 20 f2 5f 49 6e 66 |t_time..|.. ._Inf|
|00003440| 6f 72 6d 28 a4 54 28 22 | 50 57 43 3a 22 29 29 0d |orm(.T("|PWC:")).|
|00003450| 16 26 15 20 f2 5f 66 69 | 6c 6c 5f 6f 75 74 5f 70 |.&. ._fi|ll_out_p|
|00003460| 61 73 73 77 0d 16 30 15 | 20 f2 5f 63 6c 6f 73 65 |assw..0.| ._close|
|00003470| 57 28 70 61 73 73 77 25 | 29 0d 16 3a 12 20 66 69 |W(passw%|)..:. fi|
|00003480| 72 73 74 5f 74 69 6d 65 | 25 3d a3 0d 16 44 06 20 |rst_time|%=...D. |
|00003490| cc 0d 16 4e 15 20 c8 99 | 22 48 6f 75 72 67 6c 61 |...N. ..|"Hourgla|
|000034a0| 73 73 5f 4f 6e 22 0d 16 | 58 19 20 c8 99 22 48 6f |ss_On"..|X. .."Ho|
|000034b0| 75 72 67 6c 61 73 73 5f | 4c 45 44 73 22 2c 31 0d |urglass_|LEDs",1.|
|000034c0| 16 62 29 20 f2 5f 72 65 | 61 64 5f 62 69 67 28 73 |.b) ._re|ad_big(s|
|000034d0| 65 63 72 65 74 5f 6b 65 | 79 25 20 2c 20 73 65 63 |ecret_ke|y% , sec|
|000034e0| 72 65 74 24 20 20 20 29 | 0d 16 6c 27 20 c8 99 20 |ret$ )|..l' .. |
|000034f0| 22 4e 75 6d 5f 52 6e 64 | 22 2c 70 75 62 6c 69 63 |"Num_Rnd|",public|
|00003500| 5f 6b 65 79 31 25 2c 6d | 65 73 73 61 67 65 25 0d |_key1%,m|essage%.|
|00003510| 16 76 2f 20 c8 99 20 20 | 4e 75 6d 5f 41 64 64 25 |.v/ .. |Num_Add%|
|00003520| 2c 73 65 63 72 65 74 5f | 6b 65 79 25 2c 74 65 6d |,secret_|key%,tem|
|00003530| 70 25 2c 73 65 63 72 65 | 74 5f 6b 65 79 25 0d 16 |p%,secre|t_key%..|
|00003540| 80 41 20 c8 99 20 22 4e | 75 6d 5f 50 6f 77 4d 6f |.A .. "N|um_PowMo|
|00003550| 64 22 2c 6d 65 73 73 61 | 67 65 25 2c 73 65 63 72 |d",messa|ge%,secr|
|00003560| 65 74 5f 6b 65 79 25 2c | 70 75 62 6c 69 63 5f 6b |et_key%,|public_k|
|00003570| 65 79 31 25 2c 73 69 67 | 6e 61 74 75 72 65 25 0d |ey1%,sig|nature%.|
|00003580| 16 8a 32 20 f4 20 53 59 | 53 20 22 4e 75 6d 5f 53 |..2 . SY|S "Num_S|
|00003590| 75 62 22 2c 73 65 63 72 | 65 74 5f 6b 65 79 25 2c |ub",secr|et_key%,|
|000035a0| 74 65 6d 70 25 2c 73 65 | 63 72 65 74 5f 6b 65 79 |temp%,se|cret_key|
|000035b0| 25 0d 16 94 3f 20 c8 99 | 20 22 4e 75 6d 5f 50 6f |%...? ..| "Num_Po|
|000035c0| 77 4d 6f 64 22 2c 73 69 | 67 6e 61 74 75 72 65 25 |wMod",si|gnature%|
|000035d0| 2c 70 75 62 6c 69 63 5f | 6b 65 79 32 25 2c 70 75 |,public_|key2%,pu|
|000035e0| 62 6c 69 63 5f 6b 65 79 | 31 25 2c 74 65 6d 70 25 |blic_key|1%,temp%|
|000035f0| 0d 16 9e 16 20 c8 99 22 | 48 6f 75 72 67 6c 61 73 |.... .."|Hourglas|
|00003600| 73 5f 4f 66 66 22 0d 16 | a8 2b 20 e7 20 28 a4 73 |s_Off"..|.+ . (.s|
|00003610| 74 72 69 6e 67 28 74 65 | 6d 70 25 29 3d a4 73 74 |tring(te|mp%)=.st|
|00003620| 72 69 6e 67 28 6d 65 73 | 73 61 67 65 25 29 29 20 |ring(mes|sage%)) |
|00003630| 8c 0d 16 b2 21 20 20 20 | f4 20 50 52 4f 43 5f 49 |....! |. PROC_I|
|00003640| 6e 66 6f 72 6d 28 46 4e | 54 28 22 50 57 2b 3a 22 |nform(FN|T("PW+:"|
|00003650| 29 29 0d 16 bc 19 20 20 | 20 73 69 67 6e 61 74 75 |)).... | signatu|
|00003660| 72 65 5f 6b 6e 6f 77 6e | 25 3d b9 0d 16 c6 17 20 |re_known|%=..... |
|00003670| 20 20 f2 5f 63 6c 6f 73 | 65 57 28 70 61 73 73 77 | ._clos|eW(passw|
|00003680| 25 29 0d 16 d0 1c 20 20 | 20 f2 5f 4d 73 68 61 64 |%).... | ._Mshad|
|00003690| 65 28 64 65 73 6b 5f 4d | 25 2c 32 2c 30 29 0d 16 |e(desk_M|%,2,0)..|
|000036a0| da 1c 20 20 20 f2 5f 4d | 73 68 61 64 65 28 64 65 |.. ._M|shade(de|
|000036b0| 73 6b 5f 4d 25 2c 31 2c | 30 29 0d 16 e4 17 20 20 |sk_M%,1,|0).... |
|000036c0| 20 f2 5f 66 69 6c 6c 5f | 6f 75 74 5f 70 61 73 73 | ._fill_|out_pass|
|000036d0| 77 0d 16 ee 08 20 20 20 | cc 0d 16 f8 1b 20 20 20 |w.... |..... |
|000036e0| f2 5f 49 6e 66 6f 72 6d | 28 a4 54 28 22 50 57 2d |._Inform|(.T("PW-|
|000036f0| 3a 22 29 29 0d 17 02 1c | 20 20 20 f2 5f 4d 73 68 |:"))....| ._Msh|
|00003700| 61 64 65 28 64 65 73 6b | 5f 4d 25 2c 32 2c 31 29 |ade(desk|_M%,2,1)|
|00003710| 0d 17 0c 1c 20 20 20 f2 | 5f 4d 73 68 61 64 65 28 |.... .|_Mshade(|
|00003720| 64 65 73 6b 5f 4d 25 2c | 31 2c 31 29 0d 17 16 19 |desk_M%,|1,1)....|
|00003730| 20 20 20 73 69 67 6e 61 | 74 75 72 65 5f 6b 6e 6f | signa|ture_kno|
|00003740| 77 6e 25 3d a3 0d 17 20 | 17 20 20 20 f2 5f 66 69 |wn%=... |. ._fi|
|00003750| 6c 6c 5f 6f 75 74 5f 70 | 61 73 73 77 0d 17 2a 30 |ll_out_p|assw..*0|
|00003760| 20 20 20 c8 99 22 57 69 | 6d 70 5f 53 65 74 43 61 | .."Wi|mp_SetCa|
|00003770| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 70 61 73 |retPosit|ion",pas|
|00003780| 73 77 25 2c 32 2c 2c 2c | 2d 31 2c 30 0d 17 34 08 |sw%,2,,,|-1,0..4.|
|00003790| 20 20 20 cd 0d 17 3e 07 | 20 20 cd 0d 17 48 10 f2 | ...>.| ...H..|
|000037a0| 5f 65 73 63 61 70 65 5f | 6f 66 66 0d 17 52 05 e1 |_escape_|off..R..|
|000037b0| 0d 17 5c 04 0d 17 66 17 | dd 20 a4 5f 70 61 73 73 |..\...f.|. ._pass|
|000037c0| 77 6f 72 64 5f 6e 65 65 | 64 65 64 0d 17 70 14 c8 |word_nee|ded..p..|
|000037d0| 99 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 6e 22 0d |."Hourgl|ass_On".|
|000037e0| 17 7a 0f f2 5f 65 73 63 | 61 70 65 5f 6f 6e 0d 17 |.z.._esc|ape_on..|
|000037f0| 84 28 f2 5f 72 65 61 64 | 5f 62 69 67 28 70 75 62 |.(._read|_big(pub|
|00003800| 6c 69 63 5f 6b 65 79 31 | 25 2c 20 6d 79 5f 6b 65 |lic_key1|%, my_ke|
|00003810| 79 31 24 20 20 29 0d 17 | 8e 28 f2 5f 72 65 61 64 |y1$ )..|.(._read|
|00003820| 5f 62 69 67 28 70 75 62 | 6c 69 63 5f 6b 65 79 32 |_big(pub|lic_key2|
|00003830| 25 2c 20 6d 79 5f 6b 65 | 79 32 24 20 20 29 0d 17 |%, my_ke|y2$ )..|
|00003840| 98 28 f2 5f 72 65 61 64 | 5f 62 69 67 28 73 65 63 |.(._read|_big(sec|
|00003850| 72 65 74 5f 6b 65 79 25 | 20 2c 20 73 65 63 72 65 |ret_key%| , secre|
|00003860| 74 24 20 20 20 29 0d 17 | a2 18 c8 99 22 48 6f 75 |t$ )..|...."Hou|
|00003870| 72 67 6c 61 73 73 5f 4c | 45 44 73 22 2c 31 0d 17 |rglass_L|EDs",1..|
|00003880| ac 26 c8 99 20 22 4e 75 | 6d 5f 52 6e 64 22 2c 70 |.&.. "Nu|m_Rnd",p|
|00003890| 75 62 6c 69 63 5f 6b 65 | 79 31 25 2c 6d 65 73 73 |ublic_ke|y1%,mess|
|000038a0| 61 67 65 25 0d 17 b6 40 | c8 99 20 22 4e 75 6d 5f |age%...@|.. "Num_|
|000038b0| 50 6f 77 4d 6f 64 22 2c | 6d 65 73 73 61 67 65 25 |PowMod",|message%|
|000038c0| 2c 73 65 63 72 65 74 5f | 6b 65 79 25 2c 70 75 62 |,secret_|key%,pub|
|000038d0| 6c 69 63 5f 6b 65 79 31 | 25 2c 73 69 67 6e 61 74 |lic_key1|%,signat|
|000038e0| 75 72 65 25 0d 17 c0 3e | c8 99 20 22 4e 75 6d 5f |ure%...>|.. "Num_|
|000038f0| 50 6f 77 4d 6f 64 22 2c | 73 69 67 6e 61 74 75 72 |PowMod",|signatur|
|00003900| 65 25 2c 70 75 62 6c 69 | 63 5f 6b 65 79 32 25 2c |e%,publi|c_key2%,|
|00003910| 70 75 62 6c 69 63 5f 6b | 65 79 31 25 2c 74 65 6d |public_k|ey1%,tem|
|00003920| 70 25 0d 17 ca 10 f2 5f | 65 73 63 61 70 65 5f 6f |p%....._|escape_o|
|00003930| 66 66 0d 17 d4 2a e7 20 | 28 a4 73 74 72 69 6e 67 |ff...*. |(.string|
|00003940| 28 74 65 6d 70 25 29 3d | a4 73 74 72 69 6e 67 28 |(temp%)=|.string(|
|00003950| 6d 65 73 73 61 67 65 25 | 29 29 20 8c 0d 17 de 14 |message%|)) .....|
|00003960| 20 20 20 70 61 73 73 77 | 6f 72 64 24 3d 22 30 22 | passw|ord$="0"|
|00003970| 0d 17 e8 19 20 20 20 73 | 69 67 6e 61 74 75 72 65 |.... s|ignature|
|00003980| 5f 6b 6e 6f 77 6e 25 3d | b9 0d 17 f2 1c 20 20 20 |_known%=|..... |
|00003990| f2 5f 4d 73 68 61 64 65 | 28 64 65 73 6b 5f 4d 25 |._Mshade|(desk_M%|
|000039a0| 2c 31 2c 30 29 0d 17 fc | 1c 20 20 20 f2 5f 4d 73 |,1,0)...|. ._Ms|
|000039b0| 68 61 64 65 28 64 65 73 | 6b 5f 4d 25 2c 32 2c 30 |hade(des|k_M%,2,0|
|000039c0| 29 0d 18 06 17 20 20 20 | f2 5f 66 69 6c 6c 5f 6f |).... |._fill_o|
|000039d0| 75 74 5f 70 61 73 73 77 | 0d 18 10 1b 20 20 20 f2 |ut_passw|.... .|
|000039e0| 5f 49 6e 66 6f 72 6d 28 | a4 54 28 22 4e 50 4e 3a |_Inform(|.T("NPN:|
|000039f0| 22 29 29 0d 18 1a 0a 20 | 20 20 3a 3d a3 0d 18 24 |")).... | :=...$|
|00003a00| 08 20 20 20 cd 0d 18 2e | 15 c8 99 22 48 6f 75 72 |. ....|..."Hour|
|00003a10| 67 6c 61 73 73 5f 4f 66 | 66 22 0d 18 38 07 3a 3d |glass_Of|f"..8.:=|
|00003a20| b9 0d 18 42 04 0d 18 4c | 25 dd 20 a4 5f 66 69 6e |...B...L|%. ._fin|
|00003a30| 64 5f 73 69 67 6e 61 74 | 75 72 65 28 61 24 2c 20 |d_signat|ure(a$, |
|00003a40| f8 20 62 24 2c f8 20 63 | 24 29 0d 18 56 0e ea 20 |. b$,. c|$)..V.. |
|00003a50| 41 25 2c 41 24 2c 46 25 | 0d 18 60 0d 41 25 3d 73 |A%,A$,F%|..`.A%=s|
|00003a60| 69 67 6e 73 25 0d 18 6a | 17 61 24 3d a4 5f 6c 6f |igns%..j|.a$=._lo|
|00003a70| 77 65 72 5f 63 61 73 65 | 28 61 24 29 0d 18 74 1d |wer_case|(a$)..t.|
|00003a80| e7 20 61 24 3d 22 6c 69 | 73 74 20 64 69 73 74 72 |. a$="li|st distr|
|00003a90| 69 62 75 74 6f 72 22 20 | 8c 0d 18 7e 4c 20 62 24 |ibutor" |...~L b$|
|00003aa0| 3d 22 37 34 38 33 38 37 | 38 38 32 32 32 34 32 39 |="748387|88222429|
|00003ab0| 32 33 34 35 30 38 36 32 | 31 30 30 32 30 38 36 32 |23450862|10020862|
|00003ac0| 32 39 30 31 39 35 34 35 | 30 37 37 35 31 39 34 39 |29019545|07751949|
|00003ad0| 38 36 35 32 33 37 37 39 | 37 34 31 32 36 39 37 33 |86523779|74126973|
|00003ae0| 38 38 31 31 22 0d 18 88 | 4b 20 63 24 3d 22 36 37 |8811"...|K c$="67|
|00003af0| 37 33 36 34 35 31 35 31 | 32 38 32 30 30 37 30 36 |73645151|28200706|
|00003b00| 30 31 30 31 33 37 38 32 | 39 39 34 38 39 30 30 36 |01013782|99489006|
|00003b10| 39 35 38 36 32 39 33 35 | 33 31 30 31 31 32 30 38 |95862935|31011208|
|00003b20| 34 30 31 39 36 36 36 36 | 38 37 33 35 38 39 39 22 |40196666|8735899"|
|00003b30| 0d 18 92 08 20 3a 3d b9 | 0d 18 9c 06 20 cd 0d 18 |.... :=.|.... ...|
|00003b40| a6 04 0d 18 b0 05 f5 0d | 18 ba 15 20 41 24 3d 24 |........|... A$=$|
|00003b50| 41 25 3a 41 25 2b 3d a9 | 41 24 2b 31 0d 18 c4 24 |A%:A%+=.|A$+1...$|
|00003b60| 20 e7 20 c0 41 24 2c 32 | 29 3d 22 69 3d 22 20 80 | . .A$,2|)="i=" .|
|00003b70| 20 c1 41 24 2c 33 29 3d | 61 24 20 3a 46 25 3d b9 | .A$,3)=|a$ :F%=.|
|00003b80| 0d 18 ce 21 20 fd 20 41 | 25 3e 3d 73 69 67 6e 73 |...! . A|%>=signs|
|00003b90| 25 2b 73 69 67 6e 73 5f | 6c 65 6e 25 20 84 20 46 |%+signs_|len% . F|
|00003ba0| 25 0d 18 d8 0c e7 20 46 | 25 3d b9 20 8c 0d 18 e2 |%..... F|%=. ....|
|00003bb0| 16 20 20 41 24 3d 24 41 | 25 3a 41 25 2b 3d a9 41 |. A$=$A|%:A%+=.A|
|00003bc0| 24 2b 31 0d 18 ec 19 20 | 20 e7 20 c0 41 24 2c 32 |$+1.... | . .A$,2|
|00003bd0| 29 3c 3e 22 6e 3d 22 20 | 46 25 3d a3 0d 18 f6 0f |)<>"n=" |F%=.....|
|00003be0| 20 20 62 24 3d c1 41 24 | 2c 33 29 0d 19 00 16 20 | b$=.A$|,3).... |
|00003bf0| 20 41 24 3d 24 41 25 3a | 41 25 2b 3d a9 41 24 2b | A$=$A%:|A%+=.A$+|
|00003c00| 31 0d 19 0a 19 20 20 e7 | 20 c0 41 24 2c 32 29 3c |1.... .| .A$,2)<|
|00003c10| 3e 22 65 3d 22 20 46 25 | 3d a3 0d 19 14 0f 20 20 |>"e=" F%|=..... |
|00003c20| 63 24 3d c1 41 24 2c 33 | 29 0d 19 1e 07 20 20 cd |c$=.A$,3|).... .|
|00003c30| 0d 19 28 07 3d 46 25 0d | 19 32 04 0d 19 3c 14 dd |..(.=F%.|.2...<..|
|00003c40| 20 f2 5f 73 69 67 6e 5f | 63 6c 69 63 6b 65 64 0d | ._sign_|clicked.|
|00003c50| 19 46 23 e7 20 73 69 67 | 6e 61 74 75 72 65 5f 6b |.F#. sig|nature_k|
|00003c60| 6e 6f 77 6e 25 3d a3 20 | 85 20 32 2c 22 54 53 46 |nown%=. |. 2,"TSF|
|00003c70| 3a 22 0d 19 50 1d e7 20 | 6d 65 73 73 5f 6d 65 6d |:"..P.. |mess_mem|
|00003c80| 25 3d 2d 31 20 85 20 32 | 2c 22 4e 4d 53 3a 22 0d |%=-1 . 2|,"NMS:".|
|00003c90| 19 5a 47 73 69 67 6e 61 | 74 75 72 65 24 3d a4 5f |.ZGsigna|ture$=._|
|00003ca0| 73 69 67 6e 28 6d 65 73 | 73 5f 6d 65 6d 25 2c 6d |sign(mes|s_mem%,m|
|00003cb0| 65 73 73 5f 6d 65 6d 25 | 2b 6d 65 73 73 5f 6c 65 |ess_mem%|+mess_le|
|00003cc0| 6e 25 2d 31 2c 73 65 63 | 72 65 74 24 2c 6d 79 5f |n%-1,sec|ret$,my_|
|00003cd0| 6b 65 79 31 24 29 0d 19 | 64 36 24 28 6d 65 73 73 |key1$)..|d6$(mess|
|00003ce0| 5f 6d 65 6d 25 2b 6d 65 | 73 73 5f 6c 65 6e 25 29 |_mem%+me|ss_len%)|
|00003cf0| 3d 73 69 67 6e 5f 70 72 | 65 66 69 78 24 2b 73 69 |=sign_pr|efix$+si|
|00003d00| 67 6e 61 74 75 72 65 24 | 2b 22 5d 22 0d 19 6e 2f |gnature$|+"]"..n/|
|00003d10| 6d 65 73 73 5f 6c 65 6e | 25 2b 3d a9 28 73 69 67 |mess_len|%+=.(sig|
|00003d20| 6e 5f 70 72 65 66 69 78 | 24 2b 73 69 67 6e 61 74 |n_prefix|$+signat|
|00003d30| 75 72 65 24 2b 22 5d 22 | 29 2b 31 0d 19 78 0f 75 |ure$+"]"|)+1..x.u|
|00003d40| 6e 73 69 67 6e 65 64 25 | 3d a3 0d 19 82 16 f2 5f |nsigned%|=......_|
|00003d50| 74 65 6c 6c 28 a4 54 28 | 22 4d 53 39 3a 22 29 29 |tell(.T(|"MS9:"))|
|00003d60| 0d 19 8c 05 e1 0d 19 96 | 04 0d 19 a0 11 dd 20 f2 |........|...... .|
|00003d70| 5f 65 73 63 61 70 65 5f | 6f 6e 0d 19 aa 1b e7 20 |_escape_|on..... |
|00003d80| 65 73 63 61 70 65 25 3d | 30 20 8c 20 2a 46 58 20 |escape%=|0 . *FX |
|00003d90| 32 32 39 2c 30 0d 19 b4 | 0e 65 73 63 61 70 65 25 |229,0...|.escape%|
|00003da0| 2b 3d 31 0d 19 be 05 e1 | 0d 19 c8 04 0d 19 d2 12 |+=1.....|........|
|00003db0| dd 20 f2 5f 65 73 63 61 | 70 65 5f 6f 66 66 0d 19 |. ._esca|pe_off..|
|00003dc0| dc 0e 65 73 63 61 70 65 | 25 2d 3d 31 0d 19 e6 32 |..escape|%-=1...2|
|00003dd0| e7 20 65 73 63 61 70 65 | 25 3c 3d 30 20 c8 99 22 |. escape|%<=0 .."|
|00003de0| 4f 53 5f 42 79 74 65 22 | 2c 32 32 39 2c 31 3a c8 |OS_Byte"|,229,1:.|
|00003df0| 99 22 4f 53 5f 42 79 74 | 65 22 2c 31 32 34 0d 19 |."OS_Byt|e",124..|
|00003e00| f0 05 e1 0d 19 fa 04 0d | 1a 04 14 dd 20 f2 5f 65 |........|.... ._e|
|00003e10| 73 63 61 70 65 5f 73 6d | 61 73 68 0d 1a 0e 25 c8 |scape_sm|ash...%.|
|00003e20| 99 22 4f 53 5f 42 79 74 | 65 22 2c 32 32 39 2c 31 |."OS_Byt|e",229,1|
|00003e30| 3a c8 99 22 4f 53 5f 42 | 79 74 65 22 2c 31 32 34 |:.."OS_B|yte",124|
|00003e40| 0d 1a 18 0d 65 73 63 61 | 70 65 25 3d 30 0d 1a 22 |....esca|pe%=0.."|
|00003e50| 05 e1 0d 1a 2c 04 0d ff | |....,...| |
+--------+-------------------------+-------------------------+--------+--------+